Один ученик собрал за один час работы М корзину лимонов
<span>program zadacha;
var
a, b, c, s: real;
begin
writeln('Введите три числа: ');
readln(a, b, c);
if a < b then
if b < c then s := b
else
if a < c then s := c
else s := a
else
if b > c then s := b
else
if a > c then s := c
else s := a;
writeln('Среднее по значению: ', s);
end.</span>
Алг Треуг
нач
поднять перо
сместиться на вектор (1,1)
опустить перо
сместиться на вектор (2,4)
сместиться на вектор (2,-4)
сместиться на вектор (2,4)
сместиться на вектор (2,-4)
сместиться на вектор (-8,0)
поднять перо
сместиться на вектор (2,4)
опустить перо
сместиться на вектор (4,0)
поднять перо
кон
У тебя нет значения "then"
а где его нужно написать- зависит от условия задачи