Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
TokOst
01.05.2023 09:23 •
Информатика
Напишите программу: даны 3 целых числа, найти сумму их квадратов. Паскаль.
Ответ:
231425
14.10.2020 19:54
var
a, b, c, sum :integer;
begin
read(a, b, c);
sum := a*a + b*b + c*c;
writeln(sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Dashahaahaa
25.12.2021 13:10
Какие описания (переменные) называются глобальными?1. Если данный блок вложен в другой блок, то во внешнем блоке описания глобальны2.Если данный блок вложен в другой блок, то во внутреннем...
capppcappi
26.06.2021 22:17
Определите, истинно или ложно составное высказывание. Запишите ответ. (2 * 2 = 4 ∨ 3 * 3 = 10) ∨ (2 * 2 = 5 ∧ 3 * 3 = 9) --...
Skaterik
04.02.2023 07:05
Определи тип внешней памяти. выбери ответ. портативный сменный носитель информации, используемый для многократной записи и хранения данных. представляет собой помещённый в защитный...
olyaevdokimova
04.02.2023 07:05
Получить внутреннее представление отрицательного числа -2143 в двухбайтовой разрядной сетке...
Dina333098
12.01.2022 15:10
Одна ячейка памяти «троичной эвм» (компьютера, основанного на использовании троичной системы счисления) может принимать одно из трех возможных состояний. для хранения некоторой величины...
kissssss7s8
12.01.2022 15:10
Сколько процентов от a+b-c приходится на a, на b, на c? язык: pascal....
юлька438
12.01.2022 15:10
Скрлько бит информации содержит в себе сообщение обьемом 8гбайт , только подробно...
nikola58
19.04.2022 05:26
Вexcel обчисліть значення функції y=2sin(x) на відрізку [0; 2] з кроком 0.1 та побудуйте графік функції....
egekaterina201
20.06.2020 02:27
Write the he, she and it forms. 1 buy 2 carry 3 reach 4 finish 5 fly 6 go 7 live 8 miss 9play 10 study...
An125
20.06.2020 02:27
Придумать девиз к команде атомград...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var
a, b, c, sum :integer;
begin
read(a, b, c);
sum := a*a + b*b + c*c;
writeln(sum);
end.