Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
разетка1234
19.08.2020 03:45 •
Информатика
Найти значения функции у= 5х+х2, при х=50, 49, 48, 47, …, 40. паскаль.
Ответ:
Расулев
02.10.2020 07:14
Var s,i :integer;
begin
for i:=50 downto 40 do
begin
s:=(5*i)+(i*2);
writeln(s);
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
MegaFox06
17.03.2020 07:39
Какова разрядность дискретизации ацп если в регистр можно записывать одновременно 1024 различных значения?...
elenaway2002
25.02.2021 15:54
По 3 примерас предложениеми ложных высказывании...
VladProstoboy
17.04.2022 09:15
Каждая «клетка» памяти компьютера называется...
annuwka1
07.03.2020 18:46
Скласти програму знаходження суми квадратів всіх двохзначних чисел кратних 5...
stepabogocev37
24.12.2021 23:38
Вычислите, сколько литров (н.у.) кислорода могут прореагировать с 0.12 моль магния...
nastiatsiupak
09.03.2022 23:24
Благодаря чему дятлы во время добычи пищи прочно удерживаются на коре дерева...
Вячеслав991
02.03.2021 11:42
Раскройте скобки и запишите глаголы в Present Perfect 1. They (to work) today. 2. The doctor and her patient just ( to talk). 3. We alredy ( to cook) dinner. My mother...
Ronnor
25.03.2023 13:02
Кто разбирается в теме машины?...
ketti204
13.02.2020 19:04
Художні деталі в повісті климко з поясненям...
Яся83
27.06.2022 09:45
Очень очень Решите систему неравенства 969 1и2...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
for i:=50 downto 40 do
begin
s:=(5*i)+(i*2);
writeln(s);
end;
end.