ИНФОРМАТИКЕ Написать программу
"Найти среднее арифметическое трёх чисел введенных с клавиатуры"
XX= a+b+c/3
Program sr_arifm
Var a,b,c,x:real
Begin
Writeln('Введите три числа')
Readln(a,b,c)
x:=???
Writeln('Среднее арифметическое=', x)
end.
erenyeger2398
2
04.12.2020 10:52
4
Другие вопросы по теме Информатика
jojo31
25.11.2020 13:27
Vlad2005Mr
09.04.2019 12:05
Imdav88
09.04.2019 12:15
Adelinartr
18.08.2019 12:00
andriytustanov
20.10.2020 07:41
nastya20174
20.10.2020 07:08
namdokp09srw
20.10.2020 07:15
олеся0007
20.10.2020 07:30
Популярные вопросы
- Expect seminars and tutorials 15% of your time at university 1.cover...
2 - Какие элементы относятся к щелочноземельным металлам?...
1 - Iwish the so cold 1.is 2. 3.be 4.will...
1 - Вычислите: (2-1)×(2+1)×(2^2+1)×(2^4+1)×(2^8+1)-2^16. ответ должен выйти...
1 - Точка движется прямолинейно по закону s(t)=5t-0,5t^2(м).найти скорость...
1 - Keep everything on disc.if the want lose all your work 1.smashes 2.stumps...
3 - She is herbal remedies 1.known 2.knowledgeable 3.knowable 4.knowledged...
1 - Выразите y через x в выражении -5+y=-17...
3 - Три робітники виготовили разом 762 деталі, причому другий виготовив...
2 - Розкрийте дужки і спростіть вираз(а – b+ 6,1) – ( – а – b + 6,1)....
2
Тупо дописываем в 6 строку (a+b+c)/3
Program sr_arifm
Var a,b,c,x:real
begin
Writeln('Введите три числа') ;
Readln(a,b,c) ;
x:=(a+b+c)/3;
Writeln('Среднее арифметическое=', x) ;
end.