Напишите программу нахождения первых k чисел,кратных трем
на языке паскаль

azhiltsova15ozb142 azhiltsova15ozb142    2   12.05.2020 18:12    0

Ответы
snysor snysor  14.10.2020 15:03

var k, i: integer;

begin

 readln(k);

 for i:=1 to k do

   if i mod 3 = 0 then write(i, ' ');

end.

Объяснение:

Программа напишет все числа кратные 3 до k

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика