Талпринтера и сканера на компьютер,
принтер распечатывает информацию на
бумаге.
4. рассмотрите изображение. определите источник беспроводной сети.
коо
usb
other file
sharing
adsu cable
modem
media pc
internet
work pc
wireless media player
asus ip cam
audio
streaga
poa
entariament system
work pc
laptop
критерий
дескриптор
var
n: integer; // степень числа
res: integer; // результат
idx: integer; // индекс для цикла
begin
write('Введите степень числа: ');
readln(n);
res := 1;
if n < 0 then
begin
writeln('Степень должна быть неотрицательной.');
halt(-1); // завершение программы
end
else if n >= 30 then
begin writeln('Переполнение типа Integer.');
halt(-2);
end
else if n > 0 then
begin
for idx := 1 to n do
res := res * 2;
end;
writeln('Результат возведения 2 в степень ', n, ': ', res, '.');
end.