Question

Скласти блок-схему алгоритму та здійснити її опис згідно ЄСПД.
Завдання: Ввести два числа. Менше замінити їх півсумою,а більше - подвоєним добутком. Висести результати.

Answer 1

Writeln('vvedite dva chisla',a,b);
readln(a,b);
if a<b then c:=1+b else a>b writeln(a,b);
writln(c);
end.