<span>"Логика. Основы алгоритмизации"
1. Рядом со школой растут 6 деревьев: сосна, береза, липа, тополь, ель и клен. Известно, что береза ниже тополя, а липа выше клена, сосна ниже ели, липа ниже березы, сосна выше тополя. Перечислить деревья в порядке возрастания их высоты.
</span>
Var a,b,c,sum:integer;
begin
readln(a,b);
sum:=0; inc(a); c:=0;
repeat
sum:=sum+b;
inc(c);
until c=a;
sum:=sum-b;
writeln(sum);
end.
Лат. carne vale, «прощай, мясо» либо лат. car val — «корабль шутов»
Вычисление информации или игры и интернет обработка информации