Программа в паскаль. 1)в лагерь отъезжают n детей.сколько автобусов потребуется для перевозки детей,если в один автобус можно посадить 40 человек? 2)сколько парт нужно для n учеников,если за одной партой сидят двое? будет ли свободное место? 3)дана сумма денег s и стоимость одного мороженного м.сколько мороженых можно купить на эти деньги? будет ли сдача? если будет,то сколько?

116

285

Посмотреть ответы 2

Ответы на вопрос:

ivankamartynyk

Информатика

4,8(9 оценок)

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.

TheBrayn

Информатика

4,6(73 оценок)

file = input().split("/") # функция split разъединяет строку по символу, которую ей передают в качестве аргумента("/" в данном случаи), и возвращает список

for i in file:

print(i)