Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
nik19991
06.06.2020 08:15 •
Информатика
Найдите сумму квадратов всех целых чисел от 1 до 15 дано натуральное число. определите количество цифр в нём
Ответ:
Нэтэли11
01.09.2020 15:25
program kvadrati;
var i,x:integer;
begin
for i:=1 to 15 do begin
x:=sqr(i);
writeln(x);
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Лубничка
03.06.2022 08:57
Поставь вместо букв такие цифры чтобы равенство оказалось верным. ( одинаковые буквы означают одинаковые цифры , разные буквы разные цифры. нитка + нитка = ткань...
364590
03.06.2022 08:57
Перевести в двоичный код числа: 31 3 5 9 17 32 64 128 224 225 63 33 99...
arutik5
03.06.2022 08:57
Нужно дать определение понятий: лист и ячейка microsoft excel...
tetysheva09
09.07.2022 06:01
Для записи текста использовался 64-символьный алфавит.какой объём информации в байтах содержат 10 страниц текста,если на каждой странице расположено 32 строки по 64 символа в...
Румия2403
15.01.2021 04:30
Скласти 2 блок-схеми алгоритм, в якому міститься 2-3 розгалуження....
DahenkaSi05
10.01.2021 15:32
Кто может расшифровать сообщение, зашифрованное открытым ключом? PGP ДИСК...
mjsden80
17.09.2022 22:22
Какие значения принимают логические операции...
yyuyuy
13.10.2022 09:23
При поступлении в вуз абитуриенты, получившие двойку на первом экзамене, ко второму не допускаются. в массиве a[n] записаны оценки экзаменующиеся, полученные на первом экзамене....
8800553535Qwerty
13.10.2022 09:23
Представлена программа, написанная на языке pascalabc. выполните все операции и найдите, какой ответ выведется на экран.1) program s; 2) var a: array [1..10] of integer; 3) i,...
Anele2003
13.10.2022 09:23
Укажите неверную запись в двоичной системе счисления: * 10001 1102 11001...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
program kvadrati;
var i,x:integer;
begin
for i:=1 to 15 do begin
x:=sqr(i);
writeln(x);
end;
end.