Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
вова5555555
19.02.2022 01:00 •
Информатика
Вычислить сумму квадратов трех переменных, введенных с клавиатуры. выполнить в паскале и результат записывался в отдельный фал
Ответ:
defordd
04.08.2020 01:45
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var (a,b,c):=ReadReal3;
WriteAllText('out.txt',(a*a+b*b+c*c).ToString)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
kazimirova2009
18.08.2020 21:34
. отличия Эпл и дизайна и материал дизайна...
krusher77
09.03.2021 03:39
Как смотреть видео на ютубе в полный экран?...
999Милкивейка999
22.08.2020 18:08
Что относится к звуковым эффектам...
NoName2345
06.06.2021 01:37
Написать программу. Дано двузначное число N и однозначное M. Проверить, есть ли среди цифр числа N число M (на языке паскаль)...
adilyaarslanov
21.01.2023 01:47
Отметьте в списке все прикладные программы. текстовые редакторы браузеры операционные системы системы программирования игры...
dariaskaldina
08.09.2020 23:25
Определите характеристики процессора указанные на рисунке...
prunsesca005
30.03.2022 06:59
С++. Необходимо найти n-ое простое число. часть кода есть, но нужно дописать сам код:#include iostream#include vectorint main(){ int num, k, arr_cap = 1500000, counter = 0, i;...
Nastyмняша
05.02.2021 11:24
С++. Есть код на нахождение количества и суммы делитель числа. Нужно его оптимизировать. Выполняется очень долго сам код: #include int main() { int n, s = 0, ans = 0; std::cin...
илья1947
18.10.2020 10:52
Очень Задачи необходимо написать на языке Паскаль…. 2.9. Три шахматиста играют в шахматы. Известно количество очков, набранных каждым из них. Составить программу, которая определит,...
luizazamanov
04.06.2020 08:54
Отчаянный крик о Информатика, компьютерное исследование логических формул. Очень Лабораторная работа номер 19, мне нужно её сдать в файле xls...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var (a,b,c):=ReadReal3;
WriteAllText('out.txt',(a*a+b*b+c*c).ToString)
end.