Регистрация
alanasia2004
17.06.2020 01:53
Информатика
Есть ответ 👍

Как объединить несколько соседних обзацев в один? Самый быстрый

182
370
Посмотреть ответы 1

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

olegsolomein201
olegsolomein201
4,5(49 оценок)
Var m,n,h,i: longint; begin  read(n);   h: =2017-1985;   h: =h+1;   for i: =1 to h do  begin    m: =n div 100;     m: =m * 3;     n: =n+m;   end;   writeln(n); end.

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