Нужна помощь в составлении метода (паскаль АВС) -8 класс.1 задание: Составьте

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

Задать свой вопрос
1 ответ
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.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт