Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
dedada
20.04.2020 06:00 •
Информатика
Составьте программу, удваивающую значение целой переменной "а", если а> 5.
Ответ:
Danilos01
03.07.2020 17:38
Var a: integer;
begin
readln(a);
if (a>5) then a:=a*2;
writeln(a);
readln();
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
kkostova
03.02.2023 17:08
Установите соответствия между командами и их действием. 1. Вывод значения переменной С и перевод курсора на новую строку 2. Запрос значения переменной С 3. Вывод буква С на экран...
prokop228
20.02.2020 03:29
Как должна выглядить папка торрента гта 5?...
orlovski155555
13.03.2021 16:46
Написать алгоритм решения уравнения a/x=b...
V369906
27.01.2020 12:44
Що не є алгоритмом? 1)розклад руху потягів,2)програма,3)кулінарний рецепт,4)прогноз природи...
Arina3307
27.04.2023 03:27
Заполнить массив случайными числами в интервале -10; 10 найти min элемент массива и заменить его на 0...
BRICKWIH
27.04.2023 03:27
Для какого из имён ложно высказывание: не ((первая буква гласная) и (последняя буква 1)валентина 2)герман 3)анастасия 4)яков...
ruzvelt3000
15.01.2020 09:38
Заполнить массив из 13 элементов случайными числами в интервале [0, 100] и найти количество элементов массива делящихся на два без остатка....
Anyazolotiya
25.10.2022 20:31
5. Чем отличаются данные от программы? Что у них общего?...
Т1216
04.05.2023 04:44
Какие тут рысы характеру мытько и сергейко ...
sabinab13
26.10.2022 15:34
Начертить координатный луч, выбрав в качестве единичного отрезка длину 5 клеток тетради. Отметить на этом луче точки с координатами: 1/5 3/5 5/5...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
readln(a);
if (a>5) then a:=a*2;
writeln(a);
readln();
end.