Паскаль, цикл со счетчиком. Вывести на экран все двузначные числа, которые нацел?
Паскаль, цикл со счетчиком.
Вывести на экран все двузначные числа, которые нацел?? делятся на число, введённое пользователем.
Гость
Ответ(ы) на вопрос:
Гость Var k,i:integer;
begin
write('k='); readln(k);
for i:=10 to 99 do
if i mod k = 0 then write(i,' ');
end.
Пример:
k=5
10 15 20 25 30 35 40 45 50 55 60 65 70 75 80 85 90 95
Не нашли ответ?
Похожие вопросы