Помогите с информатикой пожалуйста.
Нужно вывести на экран квадраты и кубы нечетных целых чисел от 1 до n.
Pascal
var n, i: longint;
begin
read(n);
for i:=1 to n do
if i mod 2=1 then writeln(i,^2 = , i*i, , i, ^3 = , i*i*i);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
