Question

1) Найти сумму чисел от 10 до n, кратных 10, где (10 )2)Вывести последовательность четных чисел от m до n, где n 3)Вывести последовательность чисел кратных трем от m до n, где n>m.

Напишите пожалуйста решение на языке Паскаль, используя(если их надо использовать) циклы: цикл "пока" и цикл "до"

Answer 1

решение ниже в комментарии
а

Answer 2

----------------------------------

Answer 3

ретья задача

Answer 4

----------------------------------

Answer 5

program HelloWorld;

var

m, n : integer;

begin

read(n,m);

while m>=n do
begin

if n mod 3 = 0 then writeln(n);
n:=n+1;

end;

end.

Answer 6

Спасибо)