var
i, s:integer;
begin
write('Нечётные числа: ');
for i:=1 to 9 do
if <span>i mod </span>2=1 then
write(i,' ');
write(' Cумма: ');
s:=s+i;
write(s,' ');
write(' Квадрат: ');
s:=i*i;
end;
write(' Куб: ');
s:=i*i*i;
end<span>.</span>
Ответ:
1)в)
2)е)
3)г)
4)д)
5)а)
6)б)
Д 'Лист' п 'Лейка''
Дисплей