решите в Паскале с цикла, очень нужно.

Кот Леопольд пошел на рыбалку и наловил рыбы. Каждую рыбу он старательно взвесил. Первая рыба (наименьшая), которую он взвешивал весила ровно L грамм. Каждая следующая рыба была на K граммов тяжелее предыдущей.

Сколько весила вся рыба, которую наловил Леопольд, если известно, что поймал он N (N> 0) рыб?

входные данные

Программа считывает с клавиатуры 3 целых числа N, L и K, введенные через пробел (N- количество рыб, L - масса первой рыбы в граммах, K - на сколько каждая следующая рыбина тяжелее предыдущей).

Исходные данные

Программа выводит на экран одно целое число - массу всей пойманной рыбы в граммах.

Примеры входных и выходных данных

Введение: 10 250 100

Вывод: 7000

Введение: 12 100 150

Вывод: 11100

nikitakondrate1 nikitakondrate1    2   13.04.2021 18:46    0

Ответы
vaxa12345 vaxa12345  13.04.2021 18:50

var n,l,k,i:integer;

   s:real;

begin

readln(n,l,k);

s:=0;

for i:=1 to n do

 begin

  s:=s+l;

  l:=l+k

 end;

writeln(s:0:0);

readln

end.

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика