Вывести на экран квадраты нечетных чисел от 1 до 9 при for, иначе не пойдет кто прваильно сделает- много паскаль

Makich4 Makich4    2   29.08.2019 06:20    1

Ответы
dpravdivaya dpravdivaya  06.10.2020 02:15
Program kvadr_nechot;
var i:integer;
begin
for i:=1 to 9 do
  if i mod 2 = 1 then write(i*i, '   ')
end.
ПОКАЗАТЬ ОТВЕТЫ
LunaLovegood28 LunaLovegood28  06.10.2020 02:15
Var
  i:integer;
begin
  for i:=1 to 5 do Write(sqr(2*i-1),' ')  
end.

Результат
1 9 25 49 81
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика