Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
alenas000
22.06.2020 05:57 •
Информатика
Написать программу вычисления зарплаты продавца если в воскресенье с каждой проданной газеты продавцу начисляется 16руб в остальные дни 10 руб известно: а-кол-во проданных газет n-номер дня недели.в который работали продавцы паскаль
Показать ответ
Ответ:
dima1019
09.06.2020 00:26
var a,n:integer;
begin
read(a,n);
if(n = 7) then
a := a * 16
else
a := a * 10;
write(a);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
GloriaMare
20.04.2020 02:27
як з використанням змінних буде виглядати розв язок задачі python: для довільного двоцифрового числа виокремити першу та другу цифру...
rodion12345678958
25.04.2020 15:03
Напишите html-код с текстом (одно предложение) размером 7, калибром шрифта и серебристым цветом....
ulzhanzeinulla
14.12.2022 06:12
Для чего нужно создавать задний фон? 2. Как можно использовать готовые изображения для заднего фона? 3. Какие две команды должны выполниться, прежде чем программа сможет использовать...
BotanikAziz
15.07.2021 19:30
2. Тестегі сұрақтардың дұрыс жауабын таңдаңдар:1) Модель – бұл...а) қағазға объектілерді, процестерді немесе құбылыстарды бейнелеуb) нақты объект, процесс немесе құбылыс туралы...
Danilkal12
10.01.2023 15:45
Установите соответствие между условиями, записанными на языке Pascal и тем, что они означают....
angelina3404
25.04.2021 00:08
Составить блок-схему линейного алгоритма следующего процесса. В течение t мин по некоторому участку протекает электрический ток, значение которого - I м. А. Напряжение на...
Tractorust
12.02.2020 13:41
Задача №1 Автоматичний пристрій здійснив перекодування інформаційного повідомлення, спочатку записаного в коді Wіndows-1251, у кодування Unіcode. При цьому інформаційне повідомлення...
subscribetome
22.08.2022 07:18
:практическая работа №3. ветвления уровень a. напишите программу, которая получает с клавиатуры два целых числа и находит наибольшее и наименьшее из них. пример: введите два...
lotosalla1
15.08.2021 05:33
Задана последовательность из n вещественных чисел. определить количество четных и количество нечетных элементов последовательности. оператор цикла с параметром;...
Lizzzzxff
15.08.2021 05:33
По заданному логическому выражению составить логическую схему(logisim) и построить таблицу истинности: 1. а and в or not с; 2. a and not b or c....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a,n:integer;
begin
read(a,n);
if(n = 7) then
a := a * 16
else
a := a * 10;
write(a);
end.