Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var
a,m,n,k: real;
begin
readln(m,n,k);
if (m+n+k)< (m*n*k) then
a: =m+n+k
else
a: =m*n*k;
writeln(a);
end.
для начала переведем 100мбит в байты.
100мбитс=100*1024*1024/8=13107200 байт
13107200 байт*1с = 13107200 байт.
ответ: 13107200 байт.
пщояк 17 27 16 33 17
нщёп 15 27 7 17
var a: integer;
begin readln(a); if (4 * a > 9) and (4 * a < 100) then writeln('периметр двузначное число') else writeln('периметр не двузначное число'); end.
Популярные вопросы