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

Запиши те программу прошу С клавиатуры вводятся возраста трех человек: Светланы, Карины, Марины. Вывести возраст старшей, имя средней, возраст младшей из девочек.Записать условия

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

Var a,b,c:integer;
begin
writeln(Введите возраст Светланы: );
readln(a);
writeln(Введите возраст Карины: );
readln(b);
writeln(Введите возраст Марины: );
readln(c);
if ((a>b) and (a>c)) then writeln(Светлана: , a)
else if ((b>c) and (b>a)) then writeln(Карина: , b)
else if ((c>a) and (c>b)) then writeln(Марина: , c);
if ((a>c) and (c>b)) then writeln(Марина: , c)
else if((c>b) and (b>a)) then writeln(Карина: , b)
else if ((b>a) and (a>c)) then writeln(Светлана: , a);
if ((aelse if ((belse if ((cend.