Напишите программу: даны 3 целых числа, найти сумму их квадратов. Паскаль.
Агентс
1
15.05.2020 13:39
1
Другие вопросы по теме Информатика
кира674
14.01.2021 18:58
роман509
07.08.2019 03:10
цыпабезума
11.05.2020 11:57
svalevayulia10
03.10.2019 10:49
ijrts
20.04.2021 09:39
Sinci
20.04.2021 09:39
masha1234567874
20.04.2021 09:39
Популярные вопросы
- Вкаких сочетаниях имена существительные употреблены в винительном падеже? 1)вырос...
2 - Вкниге 95 страниц. ученик уже прочитал 95 страниц.сколько дней потребуется...
2 - Определите лица надо: 5 прилагательных 5 глаголов и 5 существительных...
2 - Вравнобедренном треугольнике abc угол b равен 80 градусов. найдите два других...
1 - Найдите значение выражения 2^-17 умножить на 4 в 6 степени потом пот этим черта...
2 - Рассказ про учителя, 10-15предложений!...
3 - Подчеркните звуки в слабой позиции. герой,второй,воробей,красный,зеленый....
3 - Большенство ракообразных живут в воде и дышат через жабры...
3 - Выписать по 10 слов с орфограммами: безуд. гл., парн. согл. (записать провер....
2 - Жираф бежал 25 сек со скоростью 10м/с а потом ещё какоето время со скоростью...
3
var
a, b, c, sum :integer;
begin
read(a, b, c);
sum := a*a + b*b + c*c;
writeln(sum);
end.