Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Илья2389
03.12.2022 20:20 •
Информатика
Вfree pascal'e. нужно записать программу. "ввести три целых числа с клавиатуры. найти их произведение, сумму и среднее арифметическое." p.s простите за столько тем, первый раз сдесь..
Ответ:
nastya632011
11.06.2020 06:37
var a,b,c:integer;
begin
read(a,b,c);
writeln(a*b*c);
writeln(a+b+c);
writeln((a+b+c)/3);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
akimdoge
22.09.2020 15:34
Составить алгоритм вычисления произведения 6 чисел введённых с клавиатуры !...
Farzalievik
04.07.2022 18:41
Составить алгоритм вычисления произведения шести чисел введенных в клавиатуру...
DanielKanafiev
04.07.2022 18:41
Найти произведение четных чисел в промежутке от 23 до 5...
albina1002
04.07.2022 18:41
Что такое графический редактор? каковы его основные возможности? примеры....
vilkinakarina
23.03.2020 09:28
Pascal. для функции y=x(x-1)^2(x-2)^3 записать в массив в значение аргумента х на интервале [-0,3; 0,5] и найти минимум этой функции и соответствующее значение аргумента...
NetronPozitiv
23.03.2020 09:28
Викреслити букви ,що повторюються отримаеться назва обекта презентацii ж с о л к а в н ж б й б о к н в д...
komaman
07.07.2022 14:55
Вопрос состоит в том, какой ответ является правильным, учительница говорит 2), в компиляторе выведено 3) ответ, но без пробелов, ваши предложения, после выполнения программы var...
bogds2001
07.07.2022 14:55
Средства, обеспечивающие взаимодействие между компонентами системы( 9 букв )...
новичок480
07.07.2022 14:55
Написати сучасні програми з роботою з фотографіею...
Katya08777
07.07.2022 14:55
Нахождения большего из 4-х введенных с клавиатуры чисел....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a,b,c:integer;
begin
read(a,b,c);
writeln(a*b*c);
writeln(a+b+c);
writeln((a+b+c)/3);
end.