Program kontr;
var a,b:integer;
c:char;
n,m:string;
begin
writeln ('Введите первую цифру');
readln(a);
writeln ('Введите вторую цифру');
readln(b);
writeln ('Введите один из знаков: +,-,*,/');
readln(c);
case a of
0:n:='ноль';
1:n:='один';
2:n:='два';
3:n:='три';
4:n:='четыре';
5:n:='пять';
6:n:='шесть';
7:n:='семь';
8:n:='восемь';
9:n:='девять';
end;
case b of
0:m:='ноль';
1:m:='один';
2:m:='два';
3:m:='три';
4:m:='четыре';
5:m:='пять';
6:m:='шесть';
7:m:='семь';
8:m:='восемь';
9:m:='девять';
case c of
'*': writeln (n,' умножить на ',m);
'/': writeln (n,' разделить на ',m);
'+': writeln (n,' плюс ',m);
'-': writeln (n,' минус ',m);
end.
Program kontr;
var a,b:integer;
c:char;
n,m:string;
begin
writeln ('Введите первую цифру');
readln(a);
writeln ('Введите вторую цифру');
readln(b);
writeln ('Введите один из знаков: +,-,*,/');
readln(c);
case a of
0:n:='ноль';
1:n:='один';
2:n:='два';
3:n:='три';
4:n:='четыре';
5:n:='пять';
6:n:='шесть';
7:n:='семь';
8:n:='восемь';
9:n:='девять';
end;
case b of
0:m:='ноль';
1:m:='один';
2:m:='два';
3:m:='три';
4:m:='четыре';
5:m:='пять';
6:m:='шесть';
7:m:='семь';
8:m:='восемь';
9:m:='девять';
end;
case c of
'*': writeln (n,' умножить на ',m);
'/': writeln (n,' разделить на ',m);
'+': writeln (n,' плюс ',m);
'-': writeln (n,' минус ',m);
end;
end.
ASCII - 8-битная кодировка, т.е. 1 символ = 8 бит
Высказывания:
1) Запрещается копировать любые виды контента с различных веб-сайтов.
= 66 символов.
66 * 8 = 528 бит = 66 Байт (ASCII)
66 * 16 = 1056 бит = 132 Байт (Unikod)
2) У Лукоморья дуб зеленый. Златая цепь на дубе том.
= 49 символов.
49 * 8 = 392 бит = 49 Байт (ASCII)
49 * 16 = 784 бит = 98 Байт (Unikod)
3) Москва - столица России!
= 24 символа.
24 * 8 = 192 бит = 24 Байт (ASCII)
24 * 16 = 384 бит = 48 Байт (Unikod)