Пожалуйста помогите составить алгоритм с полным ветвлением....

Question

Пожалуйста помогите составить алгоритм с полным ветвлением....

Answer 1

Var s, u1, u2, t: real;
begin
     readln(s, u1, u2, t);
     if (s = (u1 + u2) * t) then writeln('Yes')
        else writeln('No');
end.

Comments

алг
нач
вещ s, u1, u2, t
ввод s
ввод u1
ввод u2
ввод t
если (s = (u1 + u2) * t) то
вывод "Да"
иначе
вывод "Нет"
все
кон

---

алг
нач
вещ s, u1, u2, t
ввод s
ввод u1
ввод u2
ввод t
если (s = (u1 + u2) * t) то
вывод "Да"
иначе
вывод "Нет"
все
кон