иолантаи
не смогла решить первое... смутило .то что написано вывод k*k.....почему вы пропустили этот пункт...можете подсказать))))....а то я сначала делала умножение k ....а потом складывала
mirageKZ
k*k пропустил, потому что это строчка только для вывода служит. Типа вывести k квадрат, но само k в этой строке не изменяется.
Answers & Comments
Ответ:
k= 11
k= - 9
Объяснение:
var
k, i :integer;
part : double;
begin
k := 1;
for i := 1 to 5 do begin
k := k+2;
writeln('i=',i,' k=', k);
end;
writeln('--------------------');
k := 1;
for i:= 5 downto 1 do begin
k := k-2;
writeln('i=', i,' k=',k);
end;
end.