Программка в Паскаль.1)В лагерь отъезжают N детей.Сколько автобусов потребуется для перевозки

Программка в Паскаль.
1)В лагерь отъезжают N малышей.Сколько автобусов будет нужно для перевозки детей,если в один автобус можно посадить 40 человек?
2)Сколько парт необходимо для N воспитанников,если за одной партой посиживают двое?Будет ли свободное место?
3)Дана сумма денег S и цена одного мороженного М.Сколько мороженых можно покупать на эти деньги?Будет ли сдача?Если будет,то сколько?

Задать свой вопрос
Виталя
Могу решить, решать?
1 ответ
1 задачка.
var a,b,c:integer;begina:=40;writeln('Введите кол-во детей: ');read(b);c:=b div a;writeln('Потребуется ',c ,' автобуса');end.

2 задачка.
var a,b,c,d:integer;beginwrite('Введите кол-во учеников: ');read(a);c:=a div 2; writeln('Необходимо ',c,' парт на ',a,' воспитанников');d:= a mod 2;if d=0 then beginendelsewriteln('Остается ',d,' место');end.

3 задачка.
var a,b,c,d:integer;beginwriteln('Введите сумму средств: ');read(a);writeln('Введите цена одного мороженного: ');read(b);c:=a div b;writeln('Вы сможете купить ',c ,' мороженых ');d:=a mod b;writeln('У вас остается ',d,' средств');end.

Диана Мандрицкая
Если необходимо, могу скриншоты скинуть. Тут без пробелов отправилось..
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт