=ЕСЛИ(СУММ(А1:В1)>7;СРЗНАЧ(С1:С3);МИН(А1:С3))
<span>вроде как ошибки нет </span>
1024000/1024/8=125 килобайт в секунду.
2500/125=20 секунд
№1. Блок схема только к 1 заданию!!!!!!!!!!!!!!!!!!!!!!!!
Program v1; Var S,M,A,B: integer; Begin
Write ('Введите А и В, через пробел: '); Readln (A,B); S := A + B; M := A * B;
Writeln ('S = ', S); Write ('M = ', M);
End.
№2.
Program v1; Var S,M,A,B: integer; Begin
Write ('Введите А и В, через пробел: '); Readln (A,B); if (A > B) then Write ('Число ',A,' больше числа ',B) else Write ('Число ',B,' больше числа ',a)
<span>End.</span>
Объяснение:
^ не ставится у меня, но выполняет свои действия, у себя его ставьте!
можно записать так
x>16
x/2=целое число
наименьшее число, подходящее этим критериям, 18, делаем проверку
18>16
18/2=9
ответ:18