• Предмет: Информатика
  • Автор: Аноним
  • Вопрос задан 10 лет назад

Турбо паскаль, цикл for.Написать программу которая выводит таблицу квадратов первых пяти целых нечетных чисел. ПЛИЗ ОЧЕНЬ НАДО*))))

 

Ответы

Ответ дал: PsyhoAssasin
0

Program Square5NotEven;
Uses crt;
var i:integer;
begin
clrscr;
for i:=1 to 9 do
if (i mod 2)<>0 then writeln(i,' ',i*i );
readkey;

end.

Похожие вопросы