Question

Напишите плиз на Pascal 50 БАЛЛОВ

Answer 1

Ответ:



program LitersOfJuice;

var

litersPerCan, totalLiters: real;

numCans: integer;

begin

litersPerCan := 5.0; // Количество литров в одной банке

numCans := 12; // Количество банок

// Рассчитываем общее количество литров сока в 12 банках

totalLiters := litersPerCan * numCans;

// Выводим результат на экран

writeln('В 12 банках помещается ', totalLiters:0:1, ' литров сока.');

end.