Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

Паскаль! составить таблицу стоимости порций сыра весом 50, 100, 150, ... 500г (цена 1кг=420руб 37 копеек)

10-11 класс

Anna10ooo 27 окт. 2013 г., 12:56:12 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Cheprasov
27 окт. 2013 г., 13:32:56 (10 лет назад)

Uses crt ;
Var n,i:integer;
Mone, gr:real;
Begin
Clrscr;
Gr:=0.42037;
While i < 500 do
Begin
I:=i+50;
Mone:=gr*i;
Writeln(i,' гр. сыра стоит ', mone:4:2);
End;
Readkey;
End.

Ответить

Другие вопросы из категории

Читайте также

Написать программу в паскаль:

Составить таблицу стоимости порций сыра весом 50, 100,150, ... 1000 г(цена 1 кг 300р)

Написать программу, которая выводит на экран таблицу стоимости порций мороженного.


Количество
Пломбир
Каштан
Крем-брюле
1
0.80
1.60
1.00
2
1.60
3.20
2.00

10
. . .

8.00

16.00

10.00



Вы находитесь на странице вопроса "Паскаль! составить таблицу стоимости порций сыра весом 50, 100, 150, ... 500г (цена 1кг=420руб 37 копеек)", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.