<span>Вчера решал 238 вышло, могу ошибаться..
</span>
Var n,i:integer;
begin
n:=0;
for i:=1 to 4 do
n:=n+i;
writeln(n);
readln;
<span>end.</span>
Вот пожалуйста что не понятно говорите
<span>позволяют создавать новые программы на языках программирования</span>
Слева Справа
Вода Кислород
Минеральные вещества Зрелый лук
Углекислый газ
Солнце