Question

Даю 100 баллов!!! решите в Паскале с помощью цикла, очень нужно.Кот Леопольд пошел на рыбалку и наловил рыбы. Каждую рыбу он старательно взвесил. Первая рыба (наименьшая), которую он взвешивал весила ровно L грамм. Каждая следующая рыба была на K граммов тяжелее предыдущей. Сколько весила вся рыба, которую наловил Леопольд, если известно, что поймал он N (N> 0) рыб? входные данные Программа считывает с клавиатуры 3 целых числа N, L и K, введенные через пробел (N- количество рыб, L - масса первой рыбы в граммах, K - на сколько каждая следующая рыбина тяжелее предыдущей). Исходные данные Программа выводит на экран одно целое число - массу всей пойманной рыбы в граммах. Примеры входных и выходных данных Введение: 10 250 100 Вывод: 7000 Введение: 12 100 150 Вывод: 11100

Answer 1

Ответ:

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.

Объяснение:

Answer 2

Мензурка використовується для вимірювання об'єму рідини чи розчину. Об'єм є фізичною величиною, яку вимірюють у літрах (л) або мілілітрах (мл) за допомогою мензурки.