Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
taras9877
21.09.2021 22:05 •
Информатика
Паскаль. написать 2 любых числа,найти их сумму,создать условие"если сумма < 5 ввести , если > 5 ввести пока"
Ответ:
mrrusarmz
02.10.2020 18:08
// Pascal ABC.NET
var
n1, n2, sum : integer;
begin
sum := 0;
readln(n1, n2);
sum := n1 + n2;
if sum < 5 then
writeln('Привет');
if sum > 5 then
writeln('Пока');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
лошжо
11.06.2021 18:32
Дано описание одного массива: const a:array[1..4] of integer = (11,8,60,106); Верно ли описан массив? Верно Неверно...
alianna366
04.02.2020 14:53
Спрограмкой в паскале)заранее ! найти среднее элементов массива с[k], стоящих на четных местах....
mashanemiro110p08m38
04.02.2020 14:53
Написать программу в паскаль) задана матрица в(3,5) получить матрицу v путем удаления из в строки и столбца, в которых содержится минимальный элемент....
asd000fgh000
20.09.2020 09:51
Вычислить сумму элементов двух главных диагоналей матрицы с(5,5)....
Мила098
09.06.2022 02:01
Файл размером 1500кбайт передается через некоторое соединение в течение 45 секунд. определите размер файла( к кбайт), который можно передать через это соединение за 15 секунд. в...
nam0
09.06.2022 02:01
Напишите подпрограмму, которая переставляет компоненты массива x в порядке возрастания...
Yarina0311
11.01.2023 13:30
(программа python ввести три оценки за . если средний 12, сообщить: «экзамен сдан», если =8, сообщить «без шансов», в остальных случаях написать “пересдача” 30...
EvaGRNV
12.03.2020 15:29
Переведите число 7568 в десетеричную систему числения...
helpmy123
22.08.2020 08:02
На написание программы в pascal. дано целое число n ( 0). найти сумму n*2+(n+1)*2+(n+2)*2++(2*n)*2...
Hasky12
28.09.2021 18:45
7класс определить значения переменной s выполнения следущего фрагмента алгоритма представленного в виде блок схемы, если ×=24 подробнее. заранее....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var
n1, n2, sum : integer;
begin
sum := 0;
readln(n1, n2);
sum := n1 + n2;
if sum < 5 then
writeln('Привет');
if sum > 5 then
writeln('Пока');
end.