Задание 2. Составьте программу. Составьте программу, определяющую, кто из двух подруг...

Question

Задание 2. Составьте программу. Составьте программу, определяющую, кто из двух подруг старше Маша или Саша, или они ровесники.

m – возраст Маши
s – возраст Саши (исходные переменные)
результат – выведенное на экран предложение:
Саша старше Маши (если s>m)
Маша старше Саши (если m>s)
Саша и Маша ровесники (если m=s)

Answer 1

Pascal ABC

var m, s : integer;
begin
write('Введите возраст Маши ');
readln(m);
write('Введите возраст Саши ');
readln(s);
If s > m then writeln('Саша старше Маши');
If s < m then writeln('Маша старше Саши');
If m = s then writeln('Саша и Маша ровесники')
end.

Answer 2

turbo pascal.

 

Program qf;

uses crt;

var m,s:integer;

begin

clrscr;

writeln('введи возраст Маши');

readln(m);

writeln('введи возраст Саши');

readln(s);

if s>m then writeln('Саша старше Маши')

else

if m>s then writeln('Маша старше Саши')

else 

if m=s then writeln('Саша и Маша ровесники');

readln;

end.