Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
nikitamerenkov
28.03.2021 02:41 •
Информатика
Одна штука некоторого товара стоит 20,4 руб. напечатать таблицу стоимости 2, 3, …, 20 штук этого товара. программа в паскале.
Ответ:
Natashabuchok
04.10.2020 15:16
Const
prise = 20.4;
var
i:integer;
begin
for i:=2 to 20 do write(i,' штук(и) -- ',prise*i,' рублей(я)',#13#10);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Jelinad
10.04.2022 07:03
Постройте в тетради таблицу истинности...
BoberTV
19.08.2021 21:07
Информационное сообщение объёмом 32 байта содержит 128 символов. какова мощность используемого алфавита? ...
Milanaмилана
07.04.2023 19:47
Как сделать 2 этаж в роблокс режим second floor ⏫ restaurant tycoon 2 плс !...
arsenkina2004
25.02.2022 12:54
Текстовыми процессорами являются Notepad GNU AbiWord OpenOffice.org Writer EditPlus...
PollyFoxk2002
06.10.2021 19:12
Ниже приведена программа. Было проведено 10 запусков программы, при которых в качестве значений переменных s и t вводились следующие пары чисел вида (s, t): (3, -5); (3, 1); (3,...
artem877
20.10.2020 07:38
Укажите название и назначение следующих пиктограмм...
shevchukmaria2
10.08.2020 18:51
Понравилось ли вам семейство Руднёввх? литература 6 класс...
ocreater
09.01.2022 21:33
Можно такую же задачу обратную?...
Asa77
18.01.2022 18:15
Составьте по одному предложению по этим схемамнадо если не все, то хоть некоторое...
DogiWars
05.07.2022 10:43
Как производят доски и брусья? 1. пилением 2. склеиванием 3. прессованием со смолами...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
prise = 20.4;
var
i:integer;
begin
for i:=2 to 20 do write(i,' штук(и) -- ',prise*i,' рублей(я)',#13#10);
end.