tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Найдите сумму квадратов всех
Найдите сумму квадратов всех чисел от 1 до 20 с шагом 1
Аноним9111
1 29.07.2019 04:00
4
Ответы
варай
03.10.2020 16:11
// PascalABC.NET 3.1, сборка 1239 от 08.05.2016
begin
Writeln(1.To(20).Select(x->x*x).Sum)
end.
Результат
2870
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
PhantomMen
02.10.2019 18:50
Pascalabc 1. найти средне арифметическое элементов массива, превосходящих некоторое число с. 2. вывести только нечетные элементы. 3. найти среднее арифметическое элементов...
lyizadenikaeva
02.10.2019 18:50
Вывод стандартный вывод стандартный вова выиграл в олимпиадах n кубков. каждый кубок либо золотой, либо серебряный. все кубки расположены в ряд один за другим. красотой расположения...
veyper1
18.07.2019 03:20
Сколько информации (в кб) содержится в картинке размером 340 х 560 пикселей, если в ней используется 512 цветов?...
MATEMATIK12345678
21.09.2019 16:20
Составить программу,формирующую произвольный массив(с функции random) из 40 элементов. все элементы,большие 50,заменить на -6...
svishevaarina
21.09.2019 16:20
Сканируется цветное изображение размером 27,94×27,94 дюйм. разрешающая сканера — 1200×1200 dpi, глубина цвета — 32 бита. какой информационный объём будет иметь полученный графический...
Gkdm
09.06.2019 08:30
Ввести одномерный массив т[20] с клавиатуры, вывести на экран в строку. отдельно вывести элементы массива большее среднего арифметического. определить их колличество...
LansWensEEe
28.08.2019 11:40
Может ли в айпи адресе 0(нуль) стоять на первом на последнем и в середине...
ruqiyaaminova1
20.04.2021 20:40
Определите значения переменных s и i после выполнения следующих операторов: s:=0; i:=3; repeat s:=s + 7 div i; i:= i - 1; until i 1; writeln ( s = , s, i = , i);...
данаасус
20.04.2021 20:42
Завдання (достатній рівень); за зразком складіть програму, яка побудує правильний трикутник, п ятикутник, шестикутник, восьмикутник із стороною 100 (всі в одній програмі)....
kutinaI
20.04.2021 20:42
введите с клавиатуры переменную c.переменной b присвойте значение равное 10 если c b выведите на экран их сумму иначе,выведите удвоенное значение.Блок схема...
Популярные вопросы
98 1. ящик с помидорами весит 22кг сколько денег останется после олаты за...
2
Проехав три четверти пути от пункта a до b с некоторой постоянной скоростью,...
3
Вкакой фазе находится луна сегодня? в какой точке орбиты она расположена...
2
Сделать коллаж шипящие на конце мужского рода...
2
Запись каких чисел от 50 до 100 оканчивается цифрой два? запиши все такиечисла....
2
Определить аналитическим усилия в стержнях кронштейна заданной стрежневой...
1
4.3. прочитайте короткие тексты о спорте и спортсменах. установите соответствиемежду...
3
На карточках записано натуральные числа от 1 до 20. какова вероятность того,...
3
Как соотнести понятия человек и общество...
1
Кто поддерживал и кто не поддерживал брестскую книг?...
1
begin
Writeln(1.To(20).Select(x->x*x).Sum)
end.
Результат
2870