Question

решите пожалуйста в паскале abc . Телефонные разговоры с тремя населенными пунктами стоят с1, с2, с3 коп/мин. Длительность разговоров t1, t2, t3 мин. соответственно. Какую сумму насчитает компьютер к оплате за каждый разговор в отдельности и за все вместе?

Answer 1

Program Main;
var c1, c2, c3, t1, t2, t3, s: integer;
Begin
Readln (c1, c2, c3);
Readln (t1, t2, t3);
c1:=c1*t1;
c2:=c2*t2;
c3:=c3*t3
s:=c1+c2+c3;
Writeln (c1);
Writeln (c2);
Writeln (c3);
Writeln (s);
Readln;
End.

Answer 2

вот тибе ришение. звонишь ти зночит бобушки, бобушка гаварит олло оло, а ти говоришь как дила, а она ой кок харашо синочик. воть ви поговорили и тибе придет квентанция за то што ти поговорил с бобушкай.

Answer 3

Для решения данной задачи в Паскале необходимо использовать переменные для хранения стоимости разговоров и общей суммы на оплату.

Сначала объявим переменные для стоимости разговоров с1, с2, с3 и для их длительности t1, t2, t3:

var c1, c2, c3, t1, t2, t3: Integer;

Далее зададим значения для этих переменных. Например, c1 = 10, c2 = 15, c3 = 20, t1 = 5, t2 = 10, t3 = 7:

c1 := 10;
c2 := 15;
c3 := 20;
t1 := 5;
t2 := 10;
t3 := 7;

Теперь можно рассчитать стоимость каждого разговора отдельно. Для этого нужно перемножить стоимость разговора на его длительность. Создадим переменные для хранения этих значений:

var cost1, cost2, cost3: Integer;

cost1 := c1 * t1;
cost2 := c2 * t2;
cost3 := c3 * t3;

Далее можно посчитать общую сумму на оплату за все разговоры вместе. Для этого нужно сложить стоимости каждого разговора:

var total_cost: Integer;

total_cost := cost1 + cost2 + cost3;

Теперь в переменных cost1, cost2, cost3 и total_cost хранятся значения стоимости каждого разговора в отдельности и общей суммы.

Вывести эти значения на экран можно с помощью команды writeln:

writeln("Стоимость разговора 1:", cost1);
writeln("Стоимость разговора 2:", cost2);
writeln("Стоимость разговора 3:", cost3);
writeln("Общая сумма на оплату за все разговоры:", total_cost);

После выполнения программы на экране появятся значения стоимости разговора 1, стоимости разговора 2, стоимости разговора 3 и общей суммы на оплату за все разговоры.