Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
musmus11
13.12.2020 09:59 •
Информатика
Паскаль. написать 2 любых числа,найти их сумму,создать условие"если сумма < 5 ввести , если > 5 ввести пока"
Ответ:
natka012
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 оценок)
Популярные вопросы: Информатика
YanaKotsyuk
03.03.2022 21:14
Проводиться чотирьохканальний (квадро) звукозапис з частотою дискретизації 32 кгц і 32-бітним розширенням. запис триває 3 хвилини, його результати записуються в...
Анетта666
16.12.2021 19:34
Разработать программу на языке программирования Pascal: sin (x)/5x + x3 - 2...
dabby25
18.05.2023 20:37
Третья нормальная форма – реляционное отношение, в котором 1. отсутствуют неполные функциональные зависимости от состав-ного первичного ключа; 2. каждая детерминанта...
minnehanow
29.10.2021 00:01
1. Які Ви знаєте можливості програми Publisher? 2. 3 яких елементів складається вікно програми Publisher? 3. Як можна створити публікацію? 4. На які групи поділяються...
NarukiTYAN
12.01.2020 21:58
Определения круговорота азота кратко...
ishimovaalbina
12.01.2020 21:58
распределите перечисленные ниже формулы веществ на четыре группы - оксиды, основания, кислоты, соли: Na2SO4, Hl, V2O5, KMnO4, CO(OH) 2,NiO,CsOH,(NH4)2Cr2O7,Ca(OH)2,Cl2O,HCN.Дайте...
маридиана
24.09.2022 01:13
5. Определите границы простых предложений в составе сложного, расставьте знаки препинания.а) Краеведческий музей может познакомить с родного краяи бродя по залам...
maksi7
12.08.2021 15:55
Write decimal fractions 0.03 – 0.01 – 3.36 – 6.92 – 8.71 – 64.705 -...
Алика666
05.10.2022 17:40
Найти значение алгебраического выражения 10а-9b при а= 3 b =2,5 5,...
05.10.2022 17:40
5-тапсырма. Өнер туындыларымен танысып, «Парасатты тұлғалар» немесе «Парасатты ұлт» тақырыбында пікір алысу жүргізіңдер комек керек...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.