var
a,b:string;
c:real;
begin
readln(a); readln(b); readln(c);
writeln('Билет на ',a); writeln('В кинотеатр ',b); writeln('На время ',c,' Забронирован');
end.
var
step:<em> array [1..4] of real</em>;
begin
step[1] := 12*12;
step[2] := 5*5;
step[3] := step[1] + step[2];
step[4] := sqrt(step[3]);
writeln(step[4]);
end.
Ирформатике зннаки есть предупреждающие и заприщающие рекомендующие
Program prim;
uses crt;
var
y,x,a,modul,koren,kvad:real;
begin
writeln('Решаем пример:');
kvad:=sqr(x);
koren:=sqrt(x*a);
modul:=abs(a);
y:=(kvad-koren)/modul;
writeln(y);
<span>end.</span>
24.
Буквы "ш" и "и" состоят из 3 и 2 одинаковых элементов соответственно.
Приведенный рисунок состоит из 14 элементов. Для решения задачи необходимо найти все возможные варианты получения числа 14 из 2 и 3.
1: 7*2 = 14 (соответствует 7 буквам "и")
2: 4*2+2*3 = 14 (4 "и" и 2 "ш")
и и и и ш ш, и и и ш ш и, и и ш ш и и, и ш ш и и и, ш ш и и и и
и и и ш и ш, и и ш и ш и, и ш и ш и и, ш и ш и и и
и и ш и и ш, и ш и и ш и, ш и и ш и и
и ш и и и ш, ш и и и ш и
ш и и и и ш
3: 1*2+4*3 = 14 (1 "и" и 4 "ш")
и ш ш ш ш, ш и ш ш ш, ш ш и ш ш, ш ш ш и ш, ш ш ш ш и
Итого: 1+(5+4+3+2+1)+5 = 21
Ответ: 21 способ
25.
2 = 2^1 -> 2(10) = 1(B)
4 = 2^2 -> 4(10) = 2(B)
16 = 2^4 -> 16(10) = 4(B)
32 = 2^5 -> 32(10) = 5(B)
48 = 32+16 = 2^5+2^4 -> 48(10) = 54(B) = 45(B)
50 = 32+16+2 = 2^5+2^4+2^1 -> 50(10) = 145(B) = 415(B)
1236(B) = 2^1+2^2+2^3+2^6 = 2+4+8+64 = 78(10)
Ответ: 78
26.
Элементы массива - это числа 1, 2, 3, ..., 100
Простые числа - 2, 3, 5, 7, 11, 13, 17, 19, ...
Расчет по программе - в прилагаемом файле.
На экран выведется значение num[21-2] = num[19] = 19
Ответ: 19