tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дано целое число а. выведите
Дано целое число а. выведите следующее за ним четное число. при решении этой нельзя использовать условную инструкцию if
ddd114
2 19.05.2019 03:30
1
Ответы
FrankAnDWay
12.06.2020 08:41
var
a:integer;
begin
readln (a);
repeat
a:=a+1;
until (a mod 2=0);
writeln (a);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
tambovtsevanat
26.11.2020 19:05
Заполнить массив из 10 элементов случайными числами в интервале -10 10...
Софочкакошечка13
26.11.2020 19:05
Три товарища — Аркадий, Глеб и Артур — пошли в лес за грибами. Причём каждый из них шёл вместе со своей сестрой. Имена девочек: Галя, Ира, Оля. Мальчики быстро наполнили свои корзины...
kristina761
01.10.2019 15:50
Почему операционная система относится к группе системных...
Schoollolo
01.10.2019 15:50
Сделать таблицу в open office ,,мои любимые книги,,...
Dimoo9n
17.04.2019 21:39
Напишите программу, которая вводит радиус круга и вычисляет его площадь и длину окружности. входные данные входная строк\а содержит одно число - радиус круга. выходные данные в первой...
TIME6ONLINE
19.07.2019 13:00
Написать функцию, которая возвращает максимальное из двух целых чисел, полученных в качестве аргумента...
exii
19.07.2019 13:00
Решить по информатике язык python - ветвления 1. определите значение переменной «a» после выполнения фрагмента программы: a = 10 if a 5: a = 5 2. определите значение переменной «a»...
Lero4ka222
19.07.2019 13:00
Оставить программу в паскале: дан одномерный массив заменить все чётные элементы массива нулём...
kunicyna1805
19.07.2019 13:00
Написать программу, которая в введенной с клавиатуры строке преобразует строчные буквы алфавита в прописные...
Mikoсладкая
20.01.2021 08:13
Составьте и запишите текст по теме: Я люблю зиму...
Популярные вопросы
Какое произведение пушкина я бы посоветовал прочитать своему другу...
1
Назовите причины отхода большевистского руководства от нэповского курса. как вы...
1
Елочные шары распределили в коробки поровну.в 250 коробках на 1400 шаров больше,чем...
2
13,6 грамм / кубический см перевести в систему си...
2
Длина школьного двора прямоугольный формы составляет 300 м, ширина 200м. найди...
3
По французскому ( 15 )( больше 5 примеров) pour l anniversaire on offre для дня...
2
Раскрой скобки: 2(х+7) 7(5-а) (с-8)*12 14(3а-2) 8(4а-3b+11c) (6х+4y-2z)*15 *- умножить...
3
Площадь квадрата равна 169 см квадратных найдите его сторону и периметр...
2
Как менялась одежда со временем реферат...
1
60 переведите на казахский моя школа я учусь в средней школе аула токсан би. наша...
2
var
a:integer;
begin
readln (a);
repeat
a:=a+1;
until (a mod 2=0);
writeln (a);
end.