Медиатехнологии, а вообще передача информации выше перечислеными способами называется комбинированой
Program n_1;
var x:integer;
begin
readln(x);
x:=(x mod 10) + ((x div 10) mod 10) + ((x div 100) mod 10);
if (x mod 2 = 0) then writeln('true')
else writeln ('false');
end.
(в программе 2 таких чисел не существует)
Program n_2;
var x, y:integer;
begin
readln(x);
y:=x*x;
x:=(x mod 10) + ((x div 10) mod 10) + ((x div 100) mod 10);
x:=x*x*x;
if (x=y) then writeln('true')
else writeln ('false');
end.
Program n_3;
var a, b, c:integer;
begin
read(a, b, c);
if (a=b) or (b=c) or (a=c) then writeln('true')
else writeln ('false');
end.
Var
a,b,c,max:real;
begin
write('a=');
readln(a);
write('b=');
readln(b);
write('c=');
readln(c);
max:=a;
if (b>a) and (b>c) then max:=b;
if (c>b) and (c>a) then max:=c;
write('Максимальное число: ',max:5:2);
readln;end.
Ответ:
Для активации ночной темы следует запустить «Настройки», а затем перейти в раздел «Дополнительно», в котором следует выбрать пункт «Специальные возможности». В самом низу этого раздела следует активировать тумблер напротив «Инверсия цветов», в результате чего весь интерфейс операционной системы Android станет темным
Объяснение:
1)
Program n1;
var sum,k,a: integer;
begin
sum:=0;
k:=0;
readln(a);
while a<>0 do
begin
sum:=sum+a;
k:=k+1;
readln(a);
end;
write('сумма: ',sum,'; срзнач: ',sum/k);
end.
2)
Program n2;
var a,c,sum: real;
k: integer;
begin
k:=1;
readln(a,c);
sum:=a;
repeat
sum:=sum+a*0.25;
k:=k+1;
until sum>=c;
write(k);
end.