Ответы
Ответ дал:
1
Ответ:
var k, i: integer;
begin
readln(k);
for i:=1 to k do
if i mod 3 = 0 then write(i, ' ');
end.
Объяснение:
Программа напишет все числа кратные 3 до k
Вас заинтересует
3 месяца назад
3 месяца назад
4 месяца назад
4 месяца назад
1 год назад
1 год назад
7 лет назад