1)
цел a, b, c
алг
нач
ввод a,b,c
если mod(a+b,2)=0 то
вывод (a+b)/c
иначе
вывод (a+b)*c
все
кон
2)
цел a,d1,d2
алг
нач
ввод a
если (a>9) и (a<99) то
d1:=div(a,10);
d2:=mod(a,10);
вывод d1*d2
вывод' '
вывод d1+d2
вывод' '
вывод d1-d2
иначе
вывод 'ошибка'
все
кон
Школа - Ш 1. А ( единицу написать красным и сделать курсивом)
учитель- нарисовать букву БОЛЬШУЮ БУКВУ Ч ,в ней маленькую букву У, потом буквы И Т и нарисовать ель
компьютер -
1).1 символ - 1 байт.
В 1 кбайте - 1024 байт или 2^10 байт.
Переведем 22,5кб в байты: 22,5 * 2^10 = 23 040 или же 22,5 * 1024 = 23 040.
Теперь 23 040/180 = 128 .
2). Вторую задачу не знаю как решить, либо вы условие не правильно написали. Там вроде ещё должно быть написанно сколько 1 символ занимает бит.
Var s:string;
i,a:longint;
begin
readln(s);
for i:=1 to length(s) do
if (s[i]='-') or (s[i]='*') or (s[i]='/') or (s[i]=',') then
inc(a);
writeln(a);
<span>end.</span>
104−(103)+102−(101)+…+2−(1) <span>= 52
Максимальное число получится при перестановке максимального значения после знака "-" и минимального значения после знака "+":
</span><span>104−(2)+102−(101)+…+103−(1) </span> = 52+2*103-2*2 = 254