Завдання
1. Дано 2 цілих числа, перевірити чи це різні числа. (Наприклад, 7 та 8 - різні, 5 та 5 - ні)
2. Відомі довжини двох відрізків, перевірити чи підійдуть вони для створення на їх основі квадрату.
3. Два числа вводяться з клавіатури визначити мінімальне з них.
4.* Два числа вводяться з клавіатури, визначити максимальне з них, передбачивши третю ситуацію за якої числа рівні
5.* За введеним значенням температури води визначити її агрегатний стан (твердий, рідкий, газоподібний)
6.* За відомим значенням шкільної оцінки визначити її рівень (початковий, середній, достатній, високий)
Надіслати програмні файли
Теоретичний матеріал
Приклади наведені у матеріалі можна копіювати та перевіряти їх виконання у середовищі програмування Python! (Якщо виникають помилки, перевіряйте синтаксис, відступи, лапки вводяться англ. мовою)
У більшості програм на певному кроці їх виконання потрібно вибирати той чи інший варіант подальших дій, тобто використовувати розгалуження. Умовою вибору того чи іншого варіанту є виконання деякої умови. Умова повинна приймати лише два значення true або false. Сама умова записується одразу після оператора if, а після неї через двокрапку записується команда, які необхідно виконати. Якщо команд декілька, то вони відокремлюються блоком, які мають однаковий відступ після оператора if. Відступ встановлюється клавішею Tab або пробілами. Якщо розгалуження завершилось, то наступні команди слід писати під оператором if. Наприклад, практичне використання скороченого розгалуження може виглядати так:
s=10
if s>0:
print("Дане число додатне")
Якщо значення змінної а буде 0 або менше програма нічого не виведе.
Повне розгалуження
У випадку виконання іншої команди у разі хибності умови слід її писати після оператора else, не забуваючи також поставити двокрапку. Наприклад,
b=-5
if b>0:
print("Дане число додатне")
else:
print("Дане число недодатне")
program P1;
uses
crt;
var
mas : array[1..20] of integer;
i,j,k : integer;
tmp : string;
begin
clrscr;
writeln('Start array: ');
for i := 1 to 20 do
begin
mas[i] := random(100);
write(mas[i],' ');
end;
for i := 1 to 20 do
begin
if mas[i] mod 2 = 0 then
mas[i] := 0;
end;
for i := 1 to 20 do
begin
if mas[i] = 0 then
begin
for j := 20 downto i do
if mas[j] <> 0 then
begin
k := mas[j];
mas[j] := mas[i];
mas[i] := k;
end;
end;
end;
writeln('');
writeln('Result array: ');
for i := 1 to 20 do
write(mas[i],' ');
readln(tmp);
read(tmp);
end.
Воспульзуемся 2-мя формулами.
1. найдем объем информации одного знака в первом письме N=2 в степени i знак.(где N=16)
отсюда объем одного знака в письме равен 4 бит.
2. найдем объем информации одного знака во втором письме по той же формуле
получаем (где N=256)
8 бит объем одного знака во втором письме.
3. по формуле i сообщения=Количество знаков в письме * i знак.
можно найти обеъем каждого из писем, но на нужно сравнить объемы, а так как колличество знаков в письме одинкаово мы сравниваем только i знак
ответ: объем второго письма в 2 раза больше объема превого