<span>Укажите правильный вариант записи условия «х — двузначное число
(х>=10) И (х<100)
</span>
Первый вариант линейки разработал английский математик-любитель Уильям Отред в 1622 году.
Ответ:
Я думаю CTRL
Типо ctrl+c ctrl+v или как-то так
Program Pr;
Var
a : array [1..100, 1..100] of integer;
i, max, min, j, n: integer;
Begin
cls;
read(n);
min := 100000;
max := -100000;
for i := 1 to n do
for j := 1 to n do
begin
read(a[i,j]);
if (a[i,j] > max) then
max := a[i,j];
if (a[i,j] < min) then
min := a[i,j];
end;
writeln ('Сумма = ', min + max);
writeln ('Разность = ', max - min);
writeln ('Произведение = ', max * min);
<span>End.</span>
Var
A,i:integer;
P:real;
Begin
P:=1;
WriteLn('Введите 10 целых чисел');
For i:= 1 to 10 do
Begin
Read(A);
if (10<=A)and(A<=20) then P:=P*A;
End;
WriteLn('P = ',P);
End.