Решить 3. рассчитайте минимальное время, необходимое для передачи 106 байт информации по соединению через ик-порт стандарта vfir. 4. рассчитайте минимальное время, необходимое для передачи 106 байт информации по соединению через bluetooth.
Ответы на вопрос:
1)
var x: array[12] of real;
i: integer;
begin
for i: =1 to 12 do
begin
readln(x[i]);
x[i]: =x[i]-23;
end;
for i: =1 to 12 do
writeln(x[i])
end.
2)
var m: array[100] of integer;
i: integer;
begin
for i: =1 to 100 do begin
readln(m[i]);
if(m[i] mod 2=0) then m[i]: =m[i]*m[i]
else m[i]=2*m[i];
end;
for i: =1 to 100 do
writeln(m[i]);
end.
3)
var price: array[20] of real;
i: integer;
minprice: real;
begin
minprice: =10000;
for i: =1 to 20 do
begin
readln(price[i]);
if (price[i]< minprice) then minprice: =price[i];
end;
writeln(minprice)
end.
4)
var m: array[100] of integer;
i, counter: integer;
begin
readln(m[1]);
counter: =0;
for i: =2 to 100 do begin
readln(m[i]);
if ((m[i] mod 2=1) and (m[i-1] mod 2=1)) then inc(counter);
end;
writeln(counter)
end.
Популярно: Информатика
-
Футболист11111131.08.2020 10:57
-
Черничка2115.09.2021 08:01
-
dima103123.02.2023 01:12
-
ByGaTiVlAdLeN30.05.2023 15:37
-
murzyeva197014.12.2020 13:51
-
fatimo4kkkka06.01.2021 06:25
-
Мороз2504.06.2022 17:16
-
alinakat9813.05.2020 23:49
-
sashaburov19910.01.2020 19:30
-
Викарайс04.07.2020 21:12