Здравствуйте.Помогите,пожалуйста,решить задачи на Паскале. Ввести с клавиатуры 2 числа. Напечатать а) большее, б) меньшее. Ввести с клавиатуры значения для Х. Вычислить и напечатать соответствующее значение для Y по правилу: А) Y=X+5, X<6 Б) Y=X-4, X<=100 Y=X/2, X>=6 Y=X*3, X<+100 Спасибо большое,заранее)))
Ответы
Ответ дал:
0
а) var a,b,c: integer;
begin
read(a,b);
if a>b then write(a)
else write(b);
end;
б) var a,b,c: integer;
begin
read(a,b);
if a>b then write(b)
else write(a);
end;
А)
var x,y: real;
begin
read(x);
if X<=100 then write('Y=',X/2);
end;
Б)
var x,y: real;
begin
read(x);
if X>=6 then write('Y=',X*3);
end;
а X<+100 скорее всего не правильно написано
Похожие вопросы
2 года назад
2 года назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад