Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
ladygum78
15.01.2021 00:38 •
Информатика
Известны результаты двух учеников на вступительных экзаменах(их 4). проходной не ниже 17. кто поступил? на языке qbasic.
Ответ:
ггвв
27.04.2020 01:49
MS DOS QBasic 1.0
CLS
FOR i = 1 TO 2
PRINT i; ":";
INPUT a, b, c, d
s = a + b + c + d
IF s >= 17 THEN
PRINT "Postupil"
ELSE
PRINT "Ne postupil"
END IF
NEXT i
Пример
1 :? 5,4,3,4
Ne postupil
2 :? 4,5,4,5
Postupil
0,0
(0 оценок)
Популярные вопросы: Информатика
magicufoshowp08hm1
03.03.2021 01:26
Конспект формировании изображения на экране монитора 15...
Atimofeeva876
25.03.2022 06:46
Примеры растровых и векторных программ...
миша1089
27.08.2021 16:44
Выберите элементную базу вычисления машин третьего поколения...
KirikRu
13.01.2022 22:11
Составить блок-схему алгоритма: 1. вычислить у по формуле: у = (а+в-с) / (а-в) 2. вычислить у по формуле: у = { х+2, если х ≤ 5 { z-2, если х 5 3. вычислить произведение значения...
MikeSandorik
13.01.2022 22:11
Какие преимущества и недостатки у графических интерфейсов?...
Gaky
04.02.2023 22:14
Подготовьте сообщение о видах персональных компьютеров и их использовании...
NICHEGOHOROSHEGO1
04.02.2023 22:14
1) в ячейке b1 записана формула =2*$a1. какой вид приобретет формула, после того как ячейку b1 скопируют в ячейку b3 b c2 2)сравните разеры памяти необходимые для хранения...
Dariya160408589865
10.06.2021 23:04
Write sentences in the present perfect. 21 I have-you seenthis film? (see)2 Oh no!1 Brokenmy glasses. (break)3 It was a mistake. Iit. (not wear) 4 Theya new car. (buy)SAUSTRALIA...
Anastasia14417
24.02.2020 15:32
Прямоугольный параллелепипед (куб) и его развертка. Урок 1 Дан прямоугольный параллелепипед, длина которого равна 5 см, ширина – 3 см и высота – 6 см. Если каждое из соответствующих...
nbibyf2005
04.11.2022 00:04
Шумно начался урок.Надо сделать синтаксический разбор...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
CLS
FOR i = 1 TO 2
PRINT i; ":";
INPUT a, b, c, d
s = a + b + c + d
IF s >= 17 THEN
PRINT "Postupil"
ELSE
PRINT "Ne postupil"
END IF
NEXT i
Пример
1 :? 5,4,3,4
Ne postupil
2 :? 4,5,4,5
Postupil