
Прохор
6 год назад
Запишите на ЯП Паскаль программу,
соответствующую данной блок-схеме:

ОТВЕТЫ

Ovsey
Jul 2, 2019
Program H;
var a,b,c,d; integer;
begin
readln(a,b,c);
if( alt;c) then d:=a;
if(blt;c) then a:=b;
d:=d+a;
writeln(d);
end.
var a,b,c,d; integer;
begin
readln(a,b,c);
if( alt;c) then d:=a;
if(blt;c) then a:=b;
d:=d+a;
writeln(d);
end.
85