profile
Опубликовано 6 лет назад по предмету Информатика от Вероника321

Нужна помощь в составлении алгоритма (паскаль АВС) -8 класс.
1 задание: Составьте программу вычисления количества двухзначных чисел,которые кратны 2 и 3.
2 задание: Составьте программу,выводящую на экран все двузначные числа,у которых первая цифра в два раза больше второй.
3 задание: Найдите количество двузначных чисел,которые делятся на сумму своих цифр.
P.S. Помогите пожалуйста! Очень нужно и срочно! Если можете,то нужно всё сделать; если же нет,то хотя-бы одну или две задачи. Заранее спасибо!!!)))

  1. Ответ
    Ответ дан Veter0k
    var a,b,c:byte;
    begin

    for c:=1 to 99 do begin
    a:=c mod 2;  b:=c mod 3;
    if (a=0) and (b=0) then write (c);
    end;
    end.
Самые новые вопросы