tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Паскаль.напечатать таблицу
Паскаль.напечатать таблицу стоимости 100,200, 2000 г конфет(стоимость 1 кг конфет вводится с
tolikking05
3 09.06.2019 08:30
1
Ответы
опшщапоащпощшап
01.10.2020 22:58
Vari:integer;
c:real;
begin
readln(c);
Repeat
i:=i+100;
writeln(i,'g: ',c*0.001*i);
until i>=2000
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
касымжомарттокаев1
11.07.2019 19:20
Модем передаёт данные со скоростью 56 кбит/сек.передача текстового файла заняла 4,5 минуты.определите,сколько страниц содержал переданный текст,если известно,что он...
Timpo
11.07.2019 19:20
Даны два числе a и b.вычислите их сумму,разность,произведение и частное...
zimenko201411
06.04.2021 16:59
Скільки разів буде виконуватися команда тіла циклу a:=20; while a =100 do a:=a*2;...
shapo2005
06.04.2021 16:58
между населёнными пунктами A, B, C, D, E, F построены дороги, протяженность которых приведена в таблице. Определите длину кратчайшего маршрута из A в F....
AzamatAmangaliev1
12.08.2019 00:40
Составить программу какая вводит с клавиатуры элементы массива от 1 до 10 и высчитывает количество элементов с четными значениями...
kokorev861oxc4k3
16.03.2021 12:48
ОЧЕНЬ НУЖНО 1.Какая функция выводит что-либо в консоль?out();log();write();print();2.Что покажет этот код?for j in Hi! I\ m mister Robert : if j == \ : print(...
дильназ149
16.03.2021 12:49
Дан программный код определи выходные данные...
NurGangsta
12.09.2019 23:00
Объекты не являющиеся приемником информации: телефон обезьяна часы машина знак стопа...
hashedhashed1
12.09.2019 23:00
1.объем оперативной памяти 512 мб, а емкость жесткого диска 120 гб. во сколько раз емкость жесткого диска больше, чем емкость оперативной памяти? 2.информационный...
Зууууум
12.08.2019 01:10
Вкоробке лежат разноцветные карандаши сообщение о том что достали красный карандаш несет 5 бит.сколько всего карандашей ?...
Популярные вопросы
Write the original questions. He asked me if I had visited the...
1
Решите уравнение [x-6]=8 В ответе укажите меньший корень....
1
Өлеңнің идеясын анықтап, 1 сөйлеммен жазыңыз...
3
Ля си бемоль не, какой это аккорд вас...
2
3. Составьте по основным понятиям раздела ментальную карту,на которой...
1
Рассказ Д.Олдриджа Отец и сын 1)Что сказано о матери мальчика?2)Кем...
1
-О чём это произведение? Умирание ивы Ерошенко...
3
По каким показателям, входящие в состав ProjectLibre средства,...
3
Разберите предложения по главным частям речи (подлежащее, сказуемое...
2
Характеристика хімічного елементу Оксиген...
1
c:real;
begin
readln(c);
Repeat
i:=i+100;
writeln(i,'g: ',c*0.001*i);
until i>=2000
end.