Нужно решить две задачи в паскаль Вот это шаблон кода:
program zadacha;
var x, y, t1, t2, t3, s, t:real;
begin
write ('Ведіть кілкість курочок: ');
readln(x);
write ('Ведіть кілкість півників: ');
readln(y);
write ('Ведіть кілкість хвилин витрачених на курочку: ');
readln(t1);
write ('Ведіть кілкість хвилин витрачених на півника: ');
readln(t2);
t3:=t1/60;
t:=x*t3+y*t2;
s:=x+y;
writeln('Кілкість утікачів ', s:0:0);
writeln('Кілкість годин ', t:0:0);
end.

АсяГордиенко    3   17.03.2021 16:42    0