Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Evgeniy11111111111
30.12.2021 22:26 •
Информатика
Составить программу на языке паскаль: даны три числа. найти сумму и произведение этих чисел
Показать ответ
Ответ:
SHiiimochka
07.10.2020 20:49
//PascalABC.NET
//Версия 3.3, сборка 1611
begin
var (a,b,c):=ReadReal3();
writeln('сумма: ',a+b+c);
write('произведение: ',a*b*c);
end.
0,0
(0 оценок)
Ответ:
Мари7890
07.10.2020 20:49
Var
x1,x2,x3,s,p:real;
begin
write ('Введите 1 число: ');
readln(x1);
write ('Введите 2 число: ');
readln(x2);
write ('Введите 3 число: ');
readln(x3);
s:=x1+x2+x3;
p:=x1*x2*x3;
writeln('Сумма равна: ',s);
writeln('Произведение равно: ',p);
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
iratsymbal7
26.01.2022 03:44
Вася коллекционирует спичечные этикетки. для этого у него есть n альбомов вместимостью k1, k2, …, kn этикеток. вася хочет, чтобы в случае утери одного любого альбома каждая этикетка...
Андріана1111111
08.06.2020 18:13
с питоном! Задача №336. Цифра в числе Входные данные Вводятся 2 числа: x и d. Выходные данные Подсчитайте и выведите одно число - сколько раз встречается в записи натурального числа...
emin19
11.10.2020 06:36
Phyton. Сформировать массив (список) из 20 элементов. Каждый элемент равен случайному целому числу от 1 до 5. С клавиатуры вводим значение для числа X В качестве ответа, выводим...
nursultan18
06.12.2021 08:10
Как задать формат вводимых чисел...
Пташник
30.08.2021 12:11
В записи С12, что означает буква и цифра...
vsofa666
28.08.2022 08:12
добавить цикл while в этот код, очень надо( print( Enter first number ) a=int(input()) print( Enter second number ) b=int(input()) print( Enter math operation ) c=input() if c==...
maxxx1114
23.01.2022 01:57
Информатика, 10 класс. Вся информация на фото, календарь в паскале надо...
настюха20998
04.04.2023 18:45
HTML-документи мають чітку структуру. З яких стандартних частин складається веб документ? а) заголовна частина; б) службова інформація; в) розділ ініціалізації; г) тіло документа;...
QueenKulumshina
05.07.2021 12:27
В парке высадили молодые деревья: 68 берез, 70 осин и 57 тополей. Подсчитайте общее количество высаженных деревьев, их процентное соотношение. Постройте объемный вариант круговой...
дангалах
26.12.2020 19:05
Послушай аудио запись и отметь где художник ошибся...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
//Версия 3.3, сборка 1611
begin
var (a,b,c):=ReadReal3();
writeln('сумма: ',a+b+c);
write('произведение: ',a*b*c);
end.
x1,x2,x3,s,p:real;
begin
write ('Введите 1 число: ');
readln(x1);
write ('Введите 2 число: ');
readln(x2);
write ('Введите 3 число: ');
readln(x3);
s:=x1+x2+x3;
p:=x1*x2*x3;
writeln('Сумма равна: ',s);
writeln('Произведение равно: ',p);
readln;
end.