Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Leylanagieva
19.03.2023 09:54 •
Информатика
Сколько существует целых положительных чисел , меньших 2015, квадрат которых делится без остатка на 15 ?
Показать ответ
Ответ:
dezmond1992
27.07.2020 13:09
Var k,i:integer;
begin
k:=0;
for i:= 1 to 2015 do
if sqr(i) mod 15=0 then inc(k);
writeln('k=',k);
readln;
end.
0,0
(0 оценок)
Ответ:
ivanm29
27.07.2020 13:09
Всего 134 числа. См приложение.
0,0
(0 оценок)
Популярные вопросы: Информатика
kira9let
07.06.2021 21:24
С ТЕСТОМ! (начало на фотке + остальное здесь письменно) 18. Примером дискретного сигнала является: a. видеоинформация b. музыка c. человеческая речь d. текстовая...
крик56
04.09.2022 12:09
Если маска подсети 255.255.252.0 и ip-адрес компьютера в сети 156.132.15.138,то номер компьютера в сети...
Надюша13052002
04.09.2022 12:09
Выберите какие из вариантов ответов являются объектом операционной системы. 1) окно приложения 2) панель 3)рабочий стол 4)окна документов...
rafik321
23.09.2020 13:04
Информационный вес символа 6 бит .определите объём сообщения состоящего из 30 символов....
DaVinci002
23.09.2020 13:04
Прономеруй і запиши що везуть у кожному вагоні потяга...
TigerTanya
23.09.2020 13:04
На компьютере набрали сообщение: новоржевская средняя школа. определите информационный объём данного сообщения....
блеск4
15.09.2020 00:21
1.Какое десятичное число в компьютере представляется как 1011110111000000? 2.Приведите число 1,1011 к нормализованному виду в 2СС: ? * 2 ^ ?...
Rita7711
08.11.2020 02:05
Ссылка на другую рабочую книгу является...
plyushka1
27.09.2022 10:44
2х^2-2х-6х+6+х^2+3х+2х+6+5х-10+5х+15=0...
marinagridina34
27.09.2022 10:44
5предложений о сегодней погоде прямо сейчас...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
k:=0;
for i:= 1 to 2015 do
if sqr(i) mod 15=0 then inc(k);
writeln('k=',k);
readln;
end.