Паскаль дано кол-во детей и вместимость автобуса. сколько нужно автобусов нужно написать что то наподобие "uses crt, begin" желательно пошагово
115
290
Ответы на вопрос:
Uses crt; var a,b: integer; begin write('kol-bo detei = '); readln(a); write('bmectimoctb = '); readln(b); if a mod b = 0 then writeln(a div b) else writeln((a div b)+1); readkey end.
Var a,b: integer; begin writeln('kolicestvo detei='); readln(a); writeln('vmestimosti avtobusa='); readln(b); writeln('nujno ',(a div b)+1,'avtobusov'); readln; end.
Популярно: Информатика
-
annaastashova17.01.2023 03:20
-
AronJegerRivai206.02.2023 05:38
-
Мозговина1224.11.2021 23:52
-
galkaoks05614.08.2020 15:58
-
dhhfdghgxdyhfdfcc04.02.2022 04:55
-
розасит200612.12.2020 04:17
-
yulokkons12.04.2023 20:50
-
ler22kya16.10.2021 22:43
-
Freewomans24.11.2020 15:35
-
Popop11hs04.09.2020 21:23