Есть ответ 👍

Напишите в тетради описание математических выражений в программе Excel:

110
400
Посмотреть ответы 1

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


var n,k,i,s: integer;

begin

write('n = ');

readln(n);

if n< 100 then k: =n else k: =99;

s: =0;

for i: =1 to k div 11 do s: =s+i*11;

writeln('s = ',s);

end.

пример:

n = 40

s = 66

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