Вычислите на компьютере значение функции: s=1+3+5..+n. осуществите вывод значений исходных данных и результатов расчета. на pascal.turbo

PisarenkoEV1 PisarenkoEV1    1   12.09.2019 05:10    3

Ответы
Maria120163 Maria120163  04.08.2020 06:16
Var
 a,n,i,k:integer;
Begin
   Readln(n);
   k:=0;
   For i:=1 to N do
       if i mod 2=1 then k:=k+i;
   Writeln(k);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика