Информатика, опубликовано 2018-08-22 20:56:46 by Гость
Составить программу вывода на экран квадратов и кубов нечетных чисел от 13 до 48
Ответ оставил Гость
Var
i : integer;
begin
for i := 13 to 47 do
if i mod 2 = 1 then
write(i : 5, );
writeln;
for i := 13 to 47 do
if i mod 2 = 1 then
write(i*i : 5, );
writeln;
for i := 13 to 47 do
if i mod 2 = 1 then
write(i*i*i : 5, );
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на