Регистрация
olesyakondakova
16.04.2020 09:33
Информатика
Есть ответ 👍

Напишите код по данной таблице информатика

259
366
Посмотреть ответы 1

Ответы на вопрос:

roslanova051
roslanova051
4,4(57 оценок)
{$n+} uses crt; procedure l(n,first,step: integer); var   i,s,current: integer;   p: double; begin   p: =1;   s: =0;   current: =first;   for i: =1 to n do begin       s: =s+current;       p: =p*current;       write(current,',');       current: =current+step       end;   writeln(' : s=',s,', п=',p) end; var   n: integer; begin   clrscr;   write('n=');   read(n);   l(n,1,2);   l(n,2,2);   l(n,3,3);   l(n,4,4);   readkey end.

Популярно: Информатика