Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
юлия1913
01.10.2021 02:38 •
Информатика
Составить программу для решения . с клавиатуры вводится число 5 иначе прибавить 5
Ответ:
alenushka73
05.10.2020 13:45
Program n1;
var a: real;
begin
readln(a);
if a<>5 then a:=a+5;
writeln(a);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
fhjanvmendwr
01.01.2020 20:53
Определить значение: trunc(abs(-15)/round(4.5))[информатика]...
daria2512
28.10.2021 10:56
Найдите произведение первых n натуральных чисел с использоваанием 3-х циклов...
arsenandreeev
28.10.2021 10:56
Раскрась,вырежи и наклей круги в правильном порядке ,как ты собираешь пирамиду...
LisenokHan
28.10.2021 10:56
Дан двумерный массив. найти: а) сумму элементов, расположенных в верхнем левом и нижнем правом углах; б) среднее арифметическое элементов, расположенных в четырех углах. огромная...
0123220210
09.12.2022 18:19
Натуральное число из n цифр является числом Армстронга, если сумма его цифр, возведенных в n-ю степень, равна самому этому числу (как, например 153=13+53+33).Получить все числа...
LINKAyO
15.07.2021 17:19
Создать программу, которая вычисляет значение функции y = |x-1|+0.5 на интервале (-5; 15) с шагом 1. значение функции вывести на экран....
0ananasik0
30.05.2020 13:46
Решите пример по действиям (действия как вы решаете тоже пишите) (42•124+2430): 38•202-(3008: 94+527•8): 72=...
seadetibrahim
30.05.2020 13:46
Аннексия бессарабии и территориальные утраты румынии летом 1940...
CagBak
30.05.2020 13:46
Чи можна віднести до роману в. скотта слова александра дюми: історія- це гвіздок, на який я вішаю свою картину ? !...
Oliawait
30.05.2020 13:46
Составьте мне предложение со словом соберу...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a: real;
begin
readln(a);
if a<>5 then a:=a+5;
writeln(a);
end.