Паскаль. с клавиатуры вводится натуральное число k. напиши программу, которая выведет на экран в строчку

Question

Информатика: Паскаль. с клавиатуры вводится натуральное число k. напиши программу, которая выведет на экран в строчку через запятую все натуральные числа, не превышающие k, которые кратны 3.

ilhammusayev965 · Answer

var   k,i:integer; begin write( Введите k: ); readln(k); for i:=3 to k do   if i mod 3 = 0 then     begin     write(i);     if (i k) and (i k-1) and (i k-2)     then       write( , );       end; end....

Популярные вопросы