Нужно заключить выражения между and в скобки т.к. приоритет выполнения операции <u><em>and</em></u> выше чем у <u><em>></em></u> и условие выполняется неверно.
Правильная запись шестой строчки:
if ((a+b)>c) and ((a+b)>b) and ((c+b)>a) then
<span>Одно из фундаментальных понятий информатики, описывающее некоторую последовательность действий – это алгоритм</span>
<u>Задание 1</u><em>(Это чо за тупая тварь придумала, что после деления натуральных чисел может быть остаток? передай всем что они там мудаки)</em>
program day;
var c,a,b:real;
Begin
Readln(a,b);
if a>b
then begin c:=a/b;
writeln('результат ',c:0:0);
end
else writeln('a не должно быть больше b');
<span>end.</span>
1.Берешь ведро
2.набираешь воду
3.ставишь ведро на место
4.Берешь удочку
5.насаживаешь наживку на крючок
6.забрасываешь в воду удочку
7.ждешь пока рыба клюнет
8.когда рыба клюнет - подсекаешь
9.берешь рыбу в руки
10.снимаешь с крючка
11.бросаешь в ведро
и все начинаешь заново с 4 пункта
Var a,i:integer;
begin
for i:=1 to 50 do
if i mod 2 = 0 then
a:=a+i;
writeln(a);
end.