Паскаль(желательно турбо)!!
Procedure maxmin(var x: real; var y: real); var a: real; begin if (xa:=x; x:=y; y:=a; end; end; var a,b,c:real; begin writeln('Введите числа a,b,c: '); readln(a,b,c); if (aif (bwriteln(a,' ',b,' ',c); readln; end.
Смотря какие
По Паскалю примерно такие же, дашь мне свой вк, я покажу какие задачи
Я в вк уже давно не захожу, т.к. блокируют в нашей местности
А куда мне скинуть задания лучше тебе?
Оформляйте задания в данном ресурсе, именно для этого он был создан :D
Я оформил, на них уже три дня не могут ответить, вот только ты помог мне
https://znanija.com/task/30316201
Чуть позже просмотрю тогда, чем смогу - помогу
Это одно
Сейчас другое скину