Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
лиза2677
22.03.2022 18:35 •
Информатика
Написать блок-схему и программу в pascal для вычисления среднего арифметического w трёх чисел x ,y, z. плз умоляю не могу решить.
Ответ:
drart77
03.10.2020 18:54
//Блок-схема во вложении
//Pascal ABC.NET 3.1 сборка 1256
Var
x,y,z:real;
begin
read(x,y,z);
writeln((x+y+z)/3);
end.
Пример ввода:
1
2
3
Пример вывода:
2
0,0
(0 оценок)
Популярные вопросы: Информатика
00lom00
12.01.2022 04:51
Определите значение переменной «b» после выполнения фрагмента алгоритма....
влада415
08.08.2021 14:12
Работает криво 10 правильно 5 нет в чём причина? //изменения величин переменны y,x program xyz; var x,y,z:byte; begin writeln( Введите значение переменной x ); readln(x);...
123настюша321
23.03.2023 10:28
Реши задачи: A) Определите, что будет напечатано в результате работы следующей программы. var s, k:integer; begin s:= 100; for k:= 0 to 10 do s:= s – 5; writeln (s);...
masha20321
14.03.2020 02:09
Ребят очень нужно .нужно ответить да или нет....
Шаров2005
18.09.2021 12:48
Для чего человеку понадобился компьютер...
katyusha0
05.06.2020 14:24
Одному из двух шариков находящихся в 5 см друг от друга, сообщен заряд -8*10 в -8 степени ко, а другому 4*10 в 8 степени. с какой силой будут притягиваться заряженные...
Yarina0311
17.10.2020 00:58
Каково влияние океанов и морей на климат?...
erke999000
17.10.2020 00:58
С1 поля вывезли 7 машин картофеля по 12 т на каждой , а со 2 поля 8 машин картофеля по 14 т на каждой . сколько всего т картофеля вывезли с 2 полей. мне задали а я...
stilist2011
12.11.2020 07:13
Рассматри схему.расакажи что ты знаешь о звуках речи...
Макс528103
12.11.2020 07:13
Написать уравнение взаимодействия алюминия с оксидом хрома (iii). расставить степени окисления каждого элемента. расставить коэффициенты методом электронного . обозначить...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
//Pascal ABC.NET 3.1 сборка 1256
Var
x,y,z:real;
begin
read(x,y,z);
writeln((x+y+z)/3);
end.
Пример ввода:
1
2
3
Пример вывода:
2