Составить программу.
Вывести на экран 10 первых целых чисел кратных 7
pascal.
Если правильно дам ещё баллы.
Ответы
Ответ дал:
0
var a,i:integer;
begin
for a:=14 to 77 do
begin
if (a mod 7=0) then
write(a,' ');
end;
end.
Ответ дал:
0
можешь ещё помочь? смотри задачу в профиле
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад