2. Напишите программу для вывода на экран чисел, находящихся обе стороны (до и после) веденного пользователем числа.
3. n-ное количество учеников собрали k яблок и поделили их поровну между собой. Остальные яблоки оставили в корзинке.
а) Какое количество яблок досталось каждому ученику?
б) Сколько яблок в корзине?
в) Напишите программу для варианта, когда пиk вводятся пользователем.
4. Напишите программу для определения двух последних цифр введенного пользователем числа, большего, чем двузначное.
5. Автобус за день проходит п километров. За сколько дней автобус проедет расстояние м километров? Пит вводятся пользователем. Напишите программу для решения задачи.
6. Путь, пройденный муравьем, обозначен в миллиметрах. Обозначьте его в метрах, сантиметрах и миллиметрах. (например, 45 786 = 45 м 78 см 6 мм).
7. Грань куба равна a. Напишите программу, вычисляющую объем куба.
8. Даны числа a, b, cи d. Напишите программу для вычисления их среднеарифметического значения.
9. Школьная администрация решила организовать кабинет математики для 3 классов. Поскольку занятия проходят одновременно, необходимо закупить парты для каждого кабинета отдельно. За одной партой не смогут сидеть больше двух учеников. Сколько парт надо купить, если известно количество учащихся в каждом классе? Пользователь вводит три значения - количество учеников в каждом классе.
Андрей201711
2
25.02.2021 15:13
2
Другие вопросы по теме Информатика
verachistova1
26.11.2020 13:58
lol1046
26.11.2020 13:58
danilkarev201
09.03.2019 20:50
help1010100101020349
09.03.2019 20:50
enterfight
29.04.2020 16:28
Женечка5551
29.04.2020 16:28
HastWay
29.04.2020 16:29
gc121
29.04.2020 16:29
ллл107
11.06.2019 22:50
Популярные вопросы
- Найдите х, если первый член отношения (3x + 7) :6 на 22 больше второго...
3 - 1. Длина окружности основания цилиндра равна 5, высота равна 2. Найдите...
1 - Где живёт царица сказка о мёртвой царевне и 7 богатырях...
1 - Упростите плз хелп, очень надо....
2 - Обогащаем свою речь 1. От каких слов происходят термины «былина», «сказитель»?...
1 - Эльхан и Сабина пересчитали монеты в своих копилках и записали их количество.Количество...
3 - Зробіть будь-ласка 51 завдання в ньому перше і друге завдання...
1 - Гражданка Казахстана, 16-летняя М., вступила в брак с гражданином Казахстана...
3 - Д.з по физике,Можно с объяснениями И что значит L,м ?...
3 - Complete the sentences with -ed or -ing adjectives formed from the verbs...
1
2) Вопрос не понял, но думаю правильно ответил:
var a,b,c,d :int64;
begin
readln(a);
b := a -1;//число до
c := a +1;//число след.
writeln('Число до: ',b,' Число след.: ',c);
end.
3)
var a,b,c,d :int64;
begin
readln(a);//Кол-во учеников
readln(b);//Кол-во яблок
c := b div a;//Яблок каждому ученику
d := b - (a * c);//Яблок в корзине
writeln('Яблок каждому: ',c,' Яблок осталось в корзине: ',d);
end.
4)
var a,b,c,d:int64;
begin
readln(a);//Число
b := a mod 10;//остаток от деления
c := a div 10;//деление без остатка
d := c mod 10;//остаток от деления
writeln('При последнее число: ',d,' Последнее число: ',b);
end.
5)
var a,b,c,d:int64;
begin
readln(a);//Автобус за день
readln(b);//Кол-во дней
c := a * b;
writeln('Автобус проехал: ',c,' (км)');
end.
6)
var a,b,c,d:int64;
begin
readln(a);//Путь муравья
b:= a div 1000;//м
c:= (a - (b*1000)) div 10;
//см
d:= a - (b*1000+c*10);
//мм
writeln('Путь муравья: ',b, ' (м) ',c,' (см) ',d,' (мм)');
end.
7)
var a,b,c,d:int64;
begin
readln(a);//Грань куба
b := a*a*a ;
writeln('Объем куба: ',b, ' м^3');
end.
8)
var a,b,c,d,g:real;
begin
readln(a,c,d,b);//Числа
g:=(a+c+d+b) / 4 ;
writeln('Cреднее арифметическое: ', g);
end.
9)
var a,b,c,d:real;
begin
readln(a,b,c);//Учеников в кадом классе
d:= (a+b+c)/ 2;
writeln('Кол-во парт для 3 классов: ', d);
end.
Объяснение:Все программы написаны на Pascal.
Капец много задач за 5б)))