Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
viklya30
30.08.2021 18:47 •
Информатика
Используя изученные возможности языка программирования, создайте модель диалога человека и автомата по продаже воды.
Ответ:
TearPrincess2
08.09.2020 21:25
Var
kol: real;
cena: real;
stoim: real;
Begin
Writeln ('Здравствуйте, сколько бутылок воды вы хотите приобрести?');
Readln (kol);
Writeln ('по какой цене?');
Readln (cena);
Stoim: = cena * kol;
Writeln ('с вас' ,stoim, '!');
Readln;
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
vanо12
25.08.2021 20:46
Для шифровки букв используется двухзначные числа.известно что каждое из слов: марс,пирс барс и морс кодируетсь одной из последовательностей двухзначных чисел 87...
moonmyrreg
06.02.2021 04:34
Создать программу которая выводит на экран все делители числа m...
LOxxx24124
06.02.2021 04:34
Слово , произошедшее от слова вычислитель...
axaz227
21.03.2023 09:25
Что людям получать информацию,недоступную их органам чувств. 3 примера для различных органов чувств...
Guwanc98
09.02.2021 10:29
Примеры ситуаций из повседневной жизни, художественной , кино, в которых информация: 1.собирается 2.копируется. 3.обрабатывается 4.передаётся 5. 6.принимается....
ИЗЫДИ666
09.02.2021 10:29
Сообщение,записанное буквами из 16-символьного алфавита содержит 50 символов.какой объём информации оно несёт?...
25tajna
19.08.2020 01:09
1) в течении 10 секунд было передано сообщение, количество информации в котором равно 5000 байтов. каков размер алфавита, если скорость передачи - 800 символов...
evasoksoksok
19.08.2020 01:09
Пакет программ работой компьютера и обеспечевающий взаимодействие между человеком и компьютером....
sooooooyeees
25.10.2021 05:35
Умперня рна 4клавиатурнпе рнпе рнаботают рнпе4которныпе 4корнопеи4ки и одрна пъбу4ква пеи8шпет пео рнпес4кол4ко юбу4кв пеома7гитпе что рнадо сдпелать? г...
sabitova872149
06.09.2021 14:07
Заданы три числа-x,y,z найти минимальное из этих чисел результат записать в переменную p...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
kol: real;
cena: real;
stoim: real;
Begin
Writeln ('Здравствуйте, сколько бутылок воды вы хотите приобрести?');
Readln (kol);
Writeln ('по какой цене?');
Readln (cena);
Stoim: = cena * kol;
Writeln ('с вас' ,stoim, '!');
Readln;
End.