Question

№1 Вывести на экран числа в диапазоне от 10 до 100, которые кратны четырем.

№2 Найти сумму чисел, которые оканчиваются на пять, меньше 10 и больше (-10).

№3 Подсчитать количество трехзначных чисел, которые начинаются на цифру «2» и вывести эти числа на экран.

Напишите пожалуйста программу на языке паскаль

Answer 1

Решение для данной задачи

Answer 2

Вторая задача

Answer 3

не понятно условие

Answer 4

Третья задача

Answer 5

program psck;

var

i, count : integer;

begin

count:=0;

for i:=100 to 999 do if i div 100 = 2 then
begin
count:=count+1;
writeln(i);
end;
write('Количество данных чисел - ',count);

end.

Answer 6

спасибо, даже за эти 2 задачи