Написать программу, которая по введенным значениям х и у находит значение примера: это дробь -> c=x+y/x-y
216
350
Ответы на вопрос:
Program lana132; uses crt; const n=10; var i,ch,max,min,sum: integer; begin writeln('*** alphaeus is ***'); writeln('*** ok ***'); writeln(); writeln(); writeln('программа запрашивает n чисел, находит их сумму, максимальное и минимальное число'); sum: =0; write('введите 1-e число: '); read(ch); sum: =sum+ch; max: =ch; min: =ch; for i: =2 to n do begin write('введите ',i,'-e число: '); read(ch); sum: =sum+ch; if max< ch then max: =ch; if min> ch then min: =ch; end; writeln('сумма всех чисел равна ',sum); writeln('максимальное число равно ',max); writeln('минимальное число равно ',min); end.
Популярно: Информатика
-
petrosiannikita23.02.2020 12:02
-
Ксеня22820.02.2020 05:56
-
Ясте02.11.2021 15:05
-
ighy616.06.2021 23:29
-
alinaburlaka21.06.2021 12:58
-
PhoenixStep27.02.2022 12:38
-
sobakazabiyaka13.10.2021 04:06
-
maga2008209.06.2023 17:30
-
jendossia28.09.2022 09:54
-
925153070313.06.2022 13:28