Ученик нарисовал три изображения цветка. данные изображения хранятся в оперативной памяти. изображение одного цветка требует 10 КБ памяти. размер каждой ячейки ОЗУ равен 10 КБ. всего 8 ячеек в ОЗУ определите какой объём памяти оперативно запоминающего устройства остался свободным ответ укажите в битах
А) 60
В) 409600
С)400000?
Dim msg As String
msg = InputBox("Введите строку")
Dim s As Integer
If msg.IndexOf("K") > -1 Then s += 1
If msg.IndexOf("E") > -1 Then s += 1
If msg.IndexOf("Y") > -1 Then s += 1
If s = 3 Then MsgBox("YES") Else MsgBox("NO")
Pascal.
program chislo;
var x : integer;
msg : string;
begin
write('Введите строку: ');
readln(msg);
if pos(msg,'K')>0 then X:=X+1;
if pos(msg,'E')>0 then X:=X+1;
if pos(msg,'Y')>0 then X:=X+1;
if (x=3) then writeln('YES') else writeln('NO')
end.