logo
Войти Регистрация Спроси ai-bota


Екатерина2987
18.01.2022 12:10

Написать программу Pascal

Дано вещественное число - 1 кг конфет.

Вывести стоимость 1, 2, ..., 10 кг конфет

Исходные данные

85.60

Пример верного решения

85.60 171.20 256.80 342.40 428.00 513.60 599.20 684.80 770.40 856.00

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
temaganenko
temaganenko
25.04.2023 11:03
32(10) в восьмеричную? * 128(10) в восьмеричную? * 1025(10) в восьмеричную? * 252(8) в десятичную? 64(10) в восьмеричную? * 127(8) в десятичную? * 300(10) в восьмеричную?...
RomaDiduh
RomaDiduh
03.02.2021 11:12
Задано натуральное число a. является ли оно чётным? решите : a)используя операцию mod б)используя функцию int . подробно . pascal abc.(полный код напишите)...
danilpetuhuv03
danilpetuhuv03
28.11.2021 10:21
Информатика 6 класс (программное обеспечение я вам возможно все фотки в инст пролайкаю, только...
sadnaadina00
sadnaadina00
26.07.2021 22:22
Как из них получить верные равенства если разрешается переложить только одну спичку vll-v=xl lx-v=vl vl-lx=lll vlll-lll=x...
Vikylilaha
Vikylilaha
24.07.2021 11:09
Какое значение будет принемать значение y после выполнения фрагментов программы: 1. var x,y: integer; begin y: =0; for x: =1 to 9 do y: =y+x; writeln(y=,y); end. 2.var...
hasmikaydinyan
hasmikaydinyan
24.07.2021 11:09
1)дано целое число n(больше 0). найти сумму 1+1/2+1//n(вещественное число). входные данные: ввести целое числоn(1 =n =20) выходные данные: вывести сумму 1+1/2=1/3+ с точностью...
chumaeva791
chumaeva791
24.07.2021 11:09
Учебник 5 класса лого миры № 41 стр.65...
vanyavanyaere
vanyavanyaere
19.04.2020 19:52
Цикл с параметром Написать программу для вычисления значения функции y=√(3x^2+5x+7)/|x-5| , если х меняется от -20 до 10 с шагом 3....
nick313
nick313
09.01.2021 21:31
Как пишется? споткнулся об камень или о камень...
EpoPanda
EpoPanda
09.01.2021 21:31
Благоприятные и неблагоприятные факторы влияния на хозяйство в центральной россии...
Ответ:
lebedevamilp00sr9
12.10.2020 12:21

===== PascalABC.NET =====

begin

 var c := ReadReal;

 SeqGen(10, i -> $'{c * i:f2}', 1).Print

end.


Написать программу PascalДано вещественное число - 1 кг конфет.Вывести стоимость 1, 2, ..., 10 кг ко
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота