Организация ветвлений в программе. Нужно вычислить, учитывая одз при помощи оператора IF...

0 голосов
42 просмотров

Организация ветвлений в программе. Нужно вычислить, учитывая одз при помощи оператора IF (написала, не знаю как и куда всунуть). Заранее благодарю!Program laboratary;var a,b:integer;x:real;beginwriteln ('Input a and b:');beginread(a,b);if a>b then x:=2*a+b elseif ax:=-2end;writeln(' x=',x:4:1);end.


image

Информатика (16 баллов) | 42 просмотров
Дан 1 ответ
0 голосов

Лови ответ олимпиадника:3

Program laboratary;

var a,b:integer;

x:real;

begin

writeln ('Input a and b:');

read(a,b);

if a > b  

then x:=2*a+b  

else if a = b

then x:=-2

else x:=(a - 5) / b;

writeln('x =',x:4:1);

end.

(62 баллов)