1.
var s:string; m1,m2,m3:integer;
begin
writeln('- Привет! Я компьютер, а как тебя зовут?');
write('- '); readln(s);
writeln('- ',s,', введи свои оценки по 3 предметам');
write('- '); readln(m1,m2,m3);
writeln('- ',s,', твой средний балл ', (m1+m2+m3)/3);
end.
Пример:
- Привет! Я компьютер, а как тебя зовут?
- Алёна
- Алёна, введи свои оценки по 3 предметам
- 4 4 4
- Алёна, твой средний балл 4
2.
var a,b:integer;
begin
write('a = '); readln(a);
b:=(a div 100)*100 + (a mod 10)*10 + (a div 10 mod 10);
writeln('b = ',b);
end.
Пример:
a = 123
b = 132
Ответ:
128 бит
Объяснение:
1. Найдем количество пикселей в изображении
256 × 128 = 2⁸ × 2⁷ = 2¹⁵
2. Определим количество бит, приходящихся на пиксель
512 Кбайт = 2⁹ × 2¹⁰ × 2³ = 2²² бит
2²² / 2¹⁵ = 2⁷ = 128 бит - глубина кодирования цвета.
В задаче явная нелепость. Количество цветов 2¹²⁸ ≈ 3.4·10³⁸ - это безумная величина. Реальная глубина кодирования цвета обычно не превышает 32 бит, что дает 16 млн цветов и 256 градаций прозрачности.
Var a:integer;
begin
readln(a);
if a mod 2=0 then a:=a*a
else a:=a*a*a;
writeln('a = ',a);
end.
Пример:
18
<span>a = 324</span>
3)интернет,1)информация,2)итекет,5)плагиат,
Нц
нц 3 раз
вниз
закрасить
вниз
кц
нц 3 раз
вверх
кц
влево
кц