Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
hdhdhdhsaiq
10.07.2021 01:32 •
Информатика
Дано натуральное число n (n< 99999). найти среднеквадратичное значение цифр этого числа. нужна программа в паскале
Показать ответ
Ответ:
Pomogite23102017
07.07.2020 19:18
var
x: real;
y: integer;
i, k: byte;
begin
readln(y);
k := length(inttostr(y));
x := 0;
foreach o: char in inttostr(y) do
x += sqr(strtofloat(o));
x *= 1 / k;
writeln(sqrt(x));
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
buschckovaanas
11.05.2023 22:26
9. К расширениям архивированным файлом относится а) 72, rar, arj, pkg, tar 6) bas, pas, cal в) pps, ppt, pptx г) sys, bak д) gif, bmp, jpg...
сонечка3332002
18.03.2023 13:30
(Система Управления базами данных. Создание базы данных. Запрос на выработку данных)...
ZnAnIjAbro
18.01.2022 05:51
Какие наборы математических символов используют в формулах? Как вставить нужный символ?...
san4ez77
06.06.2020 10:27
Заполните двумерный числовой массив С(7,7) случайными целыми числами в интервале [-8; 8]. Выведите значения элементов массива в виде матрицы. ответ каждой задачи следует выводить...
vasa2283
21.05.2023 20:53
Переведите числа : 1010101-дест.систему счисления 1031-в двоич.систему счисления...
katerina2398
15.06.2021 03:20
14. покажите в каком пункте ответа представлен моноширинный шрифт: а) times new roman; b) courier new; c) arial; d) bodoni mt black. 13. формат страницы a4 текстового редактора...
samigyllin
15.06.2021 03:20
1. как при алфавитном подходе подходят к измерению количества? 2. как рассматривается информации информационное сообщение при алфавитном подходе? 3. чему равен информационный...
рай35
08.12.2021 05:01
Создать код цикла в GAMELOGO...
BovolskajLesj
11.12.2021 02:58
Проект – це скоординована робота людини або групи людей спрямована на досягнення поставленої мети за визначений час.Що почати працювати над проектом потрібно пройтись по ряду...
sveronika00
27.07.2022 06:33
Какой нельзя использовать для соединения компьютеров в сеть?Какой нельзя использовать для соединения компьютеров в сеть? удалённое соединение двух компьютеров через модемы...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
x: real;
y: integer;
i, k: byte;
begin
readln(y);
k := length(inttostr(y));
x := 0;
foreach o: char in inttostr(y) do
x += sqr(strtofloat(o));
x *= 1 / k;
writeln(sqrt(x));
end.