Сделать программы! вот условия: 1.дана цена за 1.2кг конфет .вывести цену за 1.2кг,1.. 2.даны 2 целых числа a и b (a заранее .

159

356

Посмотреть ответы 2

Ответы на вопрос:

Vikzza

Информатика

4,4(11 оценок)

Var p12, p, m: real; i: integer; begin writeln('введите цену (руб) за 1,2кг конфет: '); readln(p12); p: =p12/1.2; m: =1; writeln(' вес цена'); for i: =1 to round((2-1.2)/0.2)+1 do begin m: =m+0.2; writeln(m: 4: 1,' ',p*m: 6: 2,' руб'); end; end. пример: введите цену (руб) за 1,2кг конфет: 120 вес цена 1.2 120.00 руб 1.4 140.00 руб 1.6 160.00 руб 1.8 180.00 руб 2.0 200.00 руб