Предмет: Информатика,
автор: makomako201950
паскаль как вывести
1
*
3
*
5
*
место которых чисел которое делятся на 2 ставим * итак до 30
Ответы
Автор ответа:
0
Ответ:
Объяснение:
var i:integer;
begin
for i:=1 to 30 do begin
if i mod 2 = 0 then begin
writeln('*');
end
else
writeln(i);
end;
end.
Интересные вопросы
Предмет: Русский язык,
автор: urajlisov
Предмет: Информатика,
автор: Megakolt14
Предмет: История,
автор: rodomansasa341
Предмет: Математика,
автор: наташа707
Предмет: Математика,
автор: gnyravalya