Илиодор
5 год назад
3 Задание паскаль 7 класс
ОТВЕТЫ
Ognyan
Oct 24, 2020
Program pr1;
Uses Crt;
Var
x,m:real;
Begin
ClrScr;
write('Введите скорость скачивания:');
readln(x);
m:=round(0.3*60*x*0.125);
writeln('Потребуется ',m,' мегабайт');
readln;
end.
Uses Crt;
Var
x,m:real;
Begin
ClrScr;
write('Введите скорость скачивания:');
readln(x);
m:=round(0.3*60*x*0.125);
writeln('Потребуется ',m,' мегабайт');
readln;
end.
804
Смежные вопросы:
