Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
fhlurx
08.04.2023 02:50 •
Информатика
Отношение четных чисел к кратным 5 из промежутка -n до n напишите программу!
Показать ответ
Ответ:
Naniko1515
05.10.2020 15:58
Program f1;
var i,n,t,y: integer;
s;real;
begin
read(n);
for i:=-n to n do begin
if i mod 2=0 then y:=i;
if i mod 5 =0 then t:=i ;
s:=y/t;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Katia15225
18.07.2020 14:49
Укажите, какое логическое выражение равносильно выражению av ¬(¬b& c) . 1) ¬av¬bv¬c 2) avbv¬c 3) av¬bvc 4) av¬bv¬c...
Fajeh
09.05.2023 07:17
1. Назовите внешние устройства ПК. 2. Назовите внутренние устройства ПК. 3. Для чего предназначен процессор и каковы его характеристики? 4. Что такое видеоконтроллер?...
vipsab333
24.12.2022 03:25
С клавиатуры вводятся пять целых чисел. Найдите сумму чисел, превышающих 100. Формат входных данных С клавиатуры вводятся пять целых чисел a, b, c, d, e. 0 a, b, c,...
ДуанбекМариям
05.10.2021 16:06
Компьютерное представление беззнакового целого числа 110011. данное компьютерное представление пятнадцатиразрядное шестнадцатиразрядное двухразрядное восьмиразрядное...
Kiber04ек
14.12.2021 13:30
ответьте как-то красиво)) чим копіювання файлів відрізняється від переміщення? вкажіть всі відомі вам переміщення файлів....
Оpiggyugrs
12.10.2021 20:47
1.Синтаксический анализ Прочитайте текст. Какие из перечисленных после текста утверждений являются верными? Укажите номера ответов. 1.Совершенно особое положение занимает...
UlnaeMai
12.10.2021 20:47
Установіть відповідність між художнім засобом і прикладом, наведеним із твору В. Дрозда«Білий кінь Шептало».1 Персоніфікація А «А хіба ці вороні розуміють?»2 Епітет...
shintasovazeba
12.10.2021 20:47
Решите вариант I. Әдәбият теориясе 1. Чынбарлыкны сүз ярдәмендә чагылдыручы сәнгать төре 2. Танып-белү; әхлакый, тәрбияви; эстетик; тәрбия бирә; сөйләмә һәм язма телне...
4elovek20000
25.03.2023 13:03
Исправить предложение ,где то есть ошибка (уже меняла на сыплет,не работает ) Я слышу утренний колокол ,он славит праздник и сыпет медью и золотом...
arinkaapelsink
25.03.2023 13:03
1. Какая скорость наибольшая в природе? а) скорость звука в воздухе; б) скорость света; в) скорость космического корабля. 2. Какие из перечисленных тел являются искусственными...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var i,n,t,y: integer;
s;real;
begin
read(n);
for i:=-n to n do begin
if i mod 2=0 then y:=i;
if i mod 5 =0 then t:=i ;
s:=y/t;
writeln(s);
end.