===== PascalABC.NET =====
begin
var молоко := 1030;
var мороженое := 200;
var мед := 40;
var кофе := 100;
var ОбщийВес := молоко + мороженое + мед + кофе;
var ВесПорции := ReadInteger('Вес порции:');
Println('Получится порций:', Trunc(ОбщийВес / ВесПорции))
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
===== PascalABC.NET =====
begin
var молоко := 1030;
var мороженое := 200;
var мед := 40;
var кофе := 100;
var ОбщийВес := молоко + мороженое + мед + кофе;
var ВесПорции := ReadInteger('Вес порции:');
Println('Получится порций:', Trunc(ОбщийВес / ВесПорции))
end.