Здравствуйте.Помогите,пожалуйста,решить задачи на Паскале. Ввести с клавиатуры 2 числа. Напечатать а) большее, б) меньшее. Ввести с клавиатуры значения для Х. Вычислить и напечатать соответствующее значение для Y по правилу: ...
Здравствуйте.Помогите,пожалуйста,решить задачи на Паскале. Ввести с клавиатуры 2 числа. Напечатать а) большее, б) меньшее. Ввести с клавиатуры значения для Х. Вычислить и напечатать соответствующее значение для Y по правилу: А) Y=X+5, X<6 Б) Y=X-4, X<=100 Y=X/2, X>=6 Y=X*3, X<+100 Спасибо большое,заранее)))
Гость
Ответ(ы) на вопрос:
Гостьа) 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 скорее всего не правильно написано
Не нашли ответ?
Похожие вопросы