Завдання 1. Скласти програму, яка зчитає два цілих числа з клавіатури і виведе найбільше з цих чисел. Записати програму у вказану вчителем теку з назвою Ваше прізвище_1. Порівняти текст з демонстраційним розв'язанням. Завдання 2. Скласти програму, яка:
зчитає 2 дійсних числа a i b з клавіатури;
опише множину розв'язків нерівності ax + b < 0.
Записати програму у вказану вчителем теку з назвою Ваше прізвище_2. Порівняти текст з демонстраційним розв'язанням.
Математична модель до завдання 2 (створити при проведенні конкурсу ідей):
при 0 < a маємо: x < – b/a;
при a < 0 маємо: – b/a < x;
при b < 0 = a маємо: x — довільне дійсне число;
при a = 0 ≤ b маємо: нерівність розв'язків немає.
Завдання 3. Скласти програму, яка за введеною кількістю прожитих років визначить одну з таких категорій населення:
ще не школяр — до 6 років;
початкова школа — 6 –9 років;
середня школа — 10–15 років;
старша школа — 16 –17 років;
вже не школяр — понад 17 років.
Записати програму у вказану вчителем теку з назвою Ваше прізвище_3. Порівняти текст з демонстраційним розв'язанням.
Завдання 4. Скласти програму, яка виведе на екран квадрати всіх цифр у порядку зростання. Записати програму у вказану вчителем теку з назвою Ваше прізвище_4. Порівняти текст з демонстраційним розв'язанням.
Завдання 5. Скласти програму, яка виведе у порядку зростання усі натуральні числа, квадрат яких менший від введеного з клавіатури значення цілого числа. Записати програму у вказану вчителем теку з назвою Ваше прізвище_5. Порівняти текст з демонстраційним розв'язанням.
Завдання 6. Скласти програму, яка зчитає з клавіатури дійсні числа а і b — об'єми у літрах двох посудин (а < b) і відобразить процес переливання води з посудини ємністю а літрів (яку наповнюють з джерела) у посудину ємністю b літрів доки остання не буде наповнена щонайменше наполовину. Записати програму у вказану вчителем теку з назвою Ваше прізвище_6. Порівняти текст з демонстраційним розв'язанням.
Завдання 7. Скласти програму, яка для кожного з натуральних чисел від 1 до 10 включно виведе квадрат числа, якщо воно парне, і куб числа, якщо воно непарне. Записати програму у вказану вчителем теку з назвою Ваше прізвище_7. Порівняти текст з демонстраційним розв'язанням.
var i,j,n:longint;
f:boolean;
begin
writeln('Введите число');
readln(n);
if n<2 then writeln('Простых делителей нет')
else
begin
write('Число ',n,' ','= 1');
for i:=2 to n do
if n mod i=0 then
begin
f:=true;
j:=2;
while f and(j<=round(sqrt(i/2)))do
begin
if i mod j=0 then f:=false
else j:=j+1;
end;
if f then write('*',i);
end;
end;
end.
Тестовое решение:
Введите число
2345
Число 2345 = 1*5*7*35*67
1) выписываем остатки (те что в скобках 1 или 0 с последнего числа полученного при делении )
104 / 2 = 52 остаток (0)
52 / 2 = 26 остаток (0)
26 / 2 = 13 остаток (0)
13 / 2 = 6 остаток (1)
6 / 2 = 3 остаток (0)
3 / 2 = 1 (<== начинаем выписывать с этого числа) остаток (1) <= следующее
ответ: 1101000
2)
510 / 2 = 255 остаток (0)
255 / 2 = 127 остаток (1)
127 / 2 = 63 остаток (1)
63 / 2 = 31 остаток (1)
31 / 2 = 15 остаток (1)
15 / 2 = 7 остаток (1)
7 / 2 = 3 остаток (1)
3 / 2 = 1(<== первое число) остаток (1)
ответ : 111111110
3)
634 / 2 = 317 остаток (0)
317 / 2 = 158 остаток (1)
158 / 2 = 79 остаток (0)
79 / 2 = 39 остаток (1)
39 / 2 = 19 остаток (1)
19 / 2 = 9 остаток (1)
9 / 2 = 4 остаток (1)
4 / 2 = 2 остаток (0)
2/ 2 = 1 (<== первое число)остаток (1)
ответ : 1101111010
4) число 731 попробуйте сделать сами для понимания
II)
1)
10111 нумеруем все цифры с права налево (первый номер-0)
1(4) 0(3) 1(2) 1(1) 1(0)
далее схема такая 1*2 в четвёртой степени(4) + 0 * 2 в третьей(3)+1*2 во второй(2) + 1*2 в первой(1) +1*2 в нулевой (0)
и так мы получаем 16+0+4+2+1=23
2) 110011 нумеруем 1(5) 1(4) 0(3) 0(2) 1(1) 1(0)
1*2 в пятой +1*2 в четвёртой +1*0 в третьей +1*0 во второй +1*2 первой +1*2 в нулевой=32+16+0+0+2+1=51
два других сделайте сами для тренировки