Вводишь 3 числа, выбираешь средний из них и находишь его квадрат. Иначе,находишь их сумму и вводишь синим цветом
10-11 класс
|
Program n1;
Uses CRT;
Var a,b,c: integer;
begin
readln(a,b,c);
If ((a>b)and(a<c))or((a<b)and(a>c)) then writeln(a*a) else
If ((b>a)and(b<c))or((b<a)and(b>c)) then writeln(b*b) else
If ((c>a)and(c<b))or((c<a)and(c>b)) then writeln(c*c) else
begin
textcolor(blue);
writeln(a+b+c);
end;
readln
end.
Другие вопросы из категории
Дано двузначное число вывести на экран число у которого цифры расположились в обратном порядке (если число 12, то вывести 21)
-Удвоенную сумму положительных элементов;
-Удалить все четные элементы массива.
Microsoft Office 2003 либо 2007
1) IP
2) IMAP
3) HTTP
4) TCP
5) FTP
Читайте также
2.пользователь вводит натуральное число N. Найти сумму всех натуральных чисел от 1 до N.
Найти разновидность z между большим и меньшим из них
Найти разновидность z между большим и меньшим из них
а) Петя: "Я не ел. Маша тоже не ела."
б) Вася: "Маша действительно не ела. Это сделал Петя"
в) Маша: "Вася врет. Это он съел."
Выясните, кто ел варенье, если известно, что двое из них оба раза сказали правду, а третий один раз соврал, а один раз сказал правду.(Если можно, то с помощью лог. формулы или таблицы, пожалуйста)