Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

1) составьте алгоритм, по которому на компьютере будет происходить следующее: в переменную S вводится возраст Саши, в переменную М вводится возраст
Маши. В качестве результата на экран выводится фраза "Саша старше Маши" или "Машистарше Саши".
2) решите предыдущую задачу, учитывая возможность одинакового возраста Саши и Маши. В таком случае может быть получен ответ: "Саша и Маша-ровесники".
3) составьте алгоритм упорядочения значений трех переменных по возрастанию,т.е. при любых исходных значениях А, В, С отсортируйте их так, чтобы стало; А<_B<_C. (<_ -меньше либо равно)
Язык программирования-Паскаль

Ответ оставил Гость

1. Program A1;
var
s,m:integer;
begin
Writeln(Vvedi vozrast SASHI :);
Read(s);
Writeln(Vvedi vozrast MASHI :);
 Read(m);
If s>m then writeln(SASHA starshe MASHI) else writeln(MASHA starshe SASHI);
end.

2.
Program A1;
var
s,m:integer;
begin
Writeln(Vvedi vozrast SASHI :);
Read(s);
Writeln(Vvedi vozrast MASHI :); 
Read(m);
If s=m then writeln(SASHA i MASHA rovestniki) else
If s>m then writeln(SASHA starshe MASHI) else writeln(MASHA starshe SASHI);
end.

3.
Program A1;
var
a,b,c,d:real;
begin
Readln(a);
Readln(b);
Readln(c);
If ((bIf ((cIf ((a>b) and (aIf ((ca)) then begin d:=b; b:=c; c:=d; end;
If ((a>c) and (a>b)) then begin d:=c; c:=a; a:=d; end;
If ((b>c) and (b>a)) then begin d:=c; c:=b; b:=d; end;
writeln(a,<,b,<,c);
end.