Пожалуйста, прошу, помогите с информатикой мова програмування обджект паскаль, очень нужно❤
Ответ:
Объяснение:
var
x,sec:integer;
begin
writeln('Введіть кількість хвилин');
readln(x);
sec := x*60;
writeln('у '+X+' хвилинах(ні) '+sec+' секунд');
writeln;
writeln(' \(._.)/');
end.
с каким?
var n,x,persent:integer; begin writeln('Введіть кількість учнів'); readln(x); writeln('Введіть кількість хлопців'); readln(n); persent:= trunc(100/x)*n; writeln('У класі '+ persent+'% хлопців'); end.
;)