Напечатать таблицу стоимости 50, 100, 150, 1000 г сыра. стоимость 1 кг вводится с клавиатуры
romaberduk03
3
08.03.2019 04:00
11
Другие вопросы по теме Информатика
kvashenko403
07.04.2020 21:52
strukserzh
07.04.2020 21:50
Nikitka76rus
07.04.2020 21:45
Denchik1337666
25.05.2019 05:00
jdkxnVAkx
03.07.2019 18:50
ByGaTiVlAdLeN
01.07.2019 11:10
Lubimka01
01.07.2019 11:10
tskaev662
01.07.2019 11:10
Популярные вопросы
- Во дворе расчищают от снега каток. они уже расчистели четыре девятых...
1 - Вычислить давление которое оказывает керосин на дно бака площадью...
3 - Убелки в дупле а шишек. из них n еловых, сосновых - в 2 раза меньше,...
1 - Запиши выражение и найди его значение разными к произведению чисел...
3 - Ковалентная полярная связь у - ? ковалентная неполярная связь у...
1 - Рассказ из были кавказский пленник как жилин познакомился с диной...
2 - Каким членом предложения является четвертый , третьего и в шестнадцать...
3 - Внимательно прочитайте каждое предложение и определите,какие ошибки...
2 - Сколько по массе 90%-го и 60%-го растворов фосфорной кислоты надо...
2 - 1)какими свойствами отличаются диоксид кремния от диоксида углерода?...
2
program seee;
uses crt;
var p,b,c:real;
i,v:integer;
begin
clrscr;
readln(p);
writeln;
writeln('mass price ');
writeln;
while v<>1000 do
begin
v:=v+50;
writeln(v,'g ',v*p/1000:2:2);
end;
readkey;
end.