Объяснение:
мая 02
С 16:00 по 16:30
Объяснение:
a := 30
b := 6
a := a * 3 / b
если a < b
то c := 2 * a – 5 * (b + 2)
иначе c := 2 * a + 5 * (b + 2)
все
2) a := 30
b := 18
a := 3 * b - a
если a > b
то с := 2 * a - b
иначе c := 2 * a + b
все
3) a := 56
b := 7
k := 6
a := a/7 - b
если a > b
то c := a - k*b
иначе c := a + k*b
все
4) алг
нач
цел s, t
ввод s
ввод t
если s > 8 и t > 8
то вывод "YES"
иначе вывод "NO"
все
кон
Было проведено 9 запусков программы, при которых в качестве значений переменных s и t вводились следующие пары чисел:
(9, 10); (11, 5); (–2, 8); (9, 9); (2, 8); (–1, 3); (–4, 5); (10, 9); (4, –3).
Сколько было запусков, при которых программа напечатала «YES»?
5) алг
нач
цел s, t
ввод s
ввод t
если s > 4 и t > 4
то вывод "YES"
иначе вывод "NO"
все
кон
Было проведено 9 запусков программы, при которых в качестве значений переменных s и t вводились следующие пары чисел:
(10, 6); (7, 6); (–4, 3); (2, 9); (12, 7); (–11, 4); (–8, 13); (10, 9); (6, 5).
Сколько было запусков, при которых программа напечатала «NO»?
6) алг
нач
цел s, t
ввод s
ввод t
если s > 6 и t < 7
то вывод "YES"
иначе вывод "NO"
все
кон
Было проведено 9 запусков программы, при которых в качестве значений переменных s и t вводились следующие пары чисел:
(7, 3); (2, 7); (6, 10); (5, 3); (5, 4); (–11, 4); (–8, 9); (7, 3); (9, 1).
Сколько было запусков, при которых программа напечатала «YES»?
7) алг
нач
цел s, t
ввод s
ввод t
если s > 2 и t < 5
то вывод "YES"
иначе вывод "NO"
все
кон
Было проведено 9 запусков программы, при которых в качестве значений переменных s и t вводились следующие пары чисел:
(–2, 3); (2, 5); (0, 3); (5, –3); (5, 4); (11, 4); (8, –6); (7, 3); (9, 1).
Сколько было запусков, при которых программа напечатала «YES»?
V=array[1..11] of integer;
function FirstNegative(a:V;n:integer):integer;
var
i:integer;
begin
i:=0;
Result:=0;
repeat
i:=i+1;
if a[i]<0 then Result:=i
until (Result>0) or (i>n)
end;
const
m=8;
n=11;
var
a,b:V;
i,p,q:integer;
begin
Randomize;
for i:=1 to m do a[i]:=random(100)-50;
for i:=1 to n do b[i]:=random(100)-50;
p:=FirstNegative(a,m);
q:=FirstNegative(b,n);
writeln('Массив А');
for i:=1 to m do write(a[i]:5);
writeln;
writeln('Массив B');
for i:=1 to n do write(b[i]:5);
writeln;
if p<=q then writeln('Номер первого отрицательного элемента в массива А: ',p)
else writeln('Номер первого отрицательного элемента в массива B: ',q)
end.
Тестовый прогон:
Массив А
37 14 -25 32 30 -29 38 27
Массив B
33 -36 23 -17 -3 -16 -33 33 -48 -39 30
Номер первого отрицательного элемента в массива B: 2