Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
катяlove4
03.09.2020 07:54 •
Информатика
Написать в паскале
1 Вывести на экран все двузначные числа в строку через пробел
2 Напишите программу, которая 7 раз выводит на экран "Черненко Семён"
3 Напишите программу, которая вычисляет сумму всех четных чисел в диапазоне от 1 до n.
Показать ответ
Ответ:
ленок352
15.10.2020 05:41
Задание 1:
begin for var x := 10 to 99 do print(x); end.
Задание 2:
begin loop 7 do println('Черненко Семён') end.
Задание 3:
begin (1..ReadInteger('n:')).Where(x->x.isEven).Sum.Print end.
Пример работы:
0,0
(0 оценок)
Популярные вопросы: Информатика
Queen102938
22.06.2020 02:07
Вопрос 1 Как называется оператор, который отображает данные из оперативной памяти на экране? Варианты ответов Оператор присваивания Оператор вывода Оператор ввода Условный...
ник10910
09.08.2021 07:06
Написать программу в паскале найти все натуральные числа, не превосходящие заданного n, которые делятся на каждую из своих цифр....
Azaliya1111111
09.10.2022 20:31
1. Оцените информационный объем в килобайтах стереоаудиофайла длительностью звучания 20 секунд при разрешении 8 бит и частоте дискретизации 48 000 Гц? 2. Рассчитайте...
heyguys112
17.02.2023 19:40
На бесконечном поле имеется прямоугольник ровно с одним входом шириной одна клетка. Длины стен прямоугольника и место расположения входа неизвестны. Робот находится...
Dameni04
29.06.2021 11:42
Вуглеводень, відносна густина якого за гідроген флуоридом дорівнює 2, містить 10 % гідрогену. Виведіть формулу сполуки...
Sachakovakrist
20.12.2022 20:11
по ффизике,так как фото немного больше чем я думал я могу вам в лс тут отправить лс-личные сообщение)...
Valyshka11
20.12.2022 20:11
Вариант II Тесты для итогового контроля усвоения лексического и грамматического материала: 1. Im Zimmer gibtes… . a) einTisch c) einemTisch b) einesTisches d) einenTisch...
SHEVENIST
15.07.2021 08:34
ЗАПИШЕТИ В АЛФАВИТНОМ ПОРЯДКЕ, ВСТАВЛЯЯ ГДЕ ТО НЕОБХОДИМО,ПРОПУЩЕННЫЕ БУКВЫ.Брош...ра, мощ...ный, ил...страция, ед...ница, п...йзаж, ярос...ный , тер...итор...я, р...спублика,...
Danfdffefd
17.12.2021 01:35
9. Укажите факты или события связанные Наполеоном Бонапартом. А) поражение битвы в 1812 году в РоссииB) издал Гражданский кодекс — свод унифицированных законов, действовавшей...
Анна12061
06.06.2020 21:18
8. Контрольное списывание. /нСамое прекрасное на свёте – Родина.У каждого человека есть Родина. И каждый любит её.Человек любит людей, с которыми он живёт, любит свойнарод....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Задание 1:
begin for var x := 10 to 99 do print(x); end.Задание 2:
begin loop 7 do println('Черненко Семён') end.Задание 3:
begin (1..ReadInteger('n:')).Where(x->x.isEven).Sum.Print end.Пример работы: