среда, 22 апреля 2015 г.

Program three;
var A,B,C,F:real;
begin
writeln('vvedite 3 chisla')
readln(A,B,C);
if A+B<C then F:=1;
else
F:=0;
writeln ('A=','B=','C=');
readln;
end.

Комментариев нет:

Отправить комментарий