Помогите с информатикой пожалуйста.
Нужно вывести на экран квадраты и кубы нечетных целых чисел от 1 до n.
Ответы
Ответ дал:
0
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.
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.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад
9 лет назад