Var A,b,s,p:real;
begin
read (a b);
writeln ('s=', a*b);
writeln ('p=', 2*a+2*b);
end.
на примере прямоугольника
Var
A: array [1..10] of integer;
min,i:integer;
begin
i:=1
while i<11 do
begin
readln(A[i]);
i:=i+1;
end;
i:=1;
n:=A[1];
repeat
if min>A[i] then
min:=A[i]
i:=i+1;
until I=10;
A[10]:=min;
end
2 задача:утверждение 1 верно т.к в остальных случаях(именно 2-3)возможен такой исход,что дочка может приехать с мамой,что означает их равнозначность.
3 задача:САДВ
1 задача:в условии сказано 6 участников,а перечислено только 5.Поэтому можно сказать,что условие задачи не является корректным
Вероятная система каталога:
D:\\
-Информатика\
--Контрольная.txt
-Млекопитающие\
--хищники\
.
Ход такой, исходный путь:
<span>D:\\
-Млекопитающие\
--хищники\
.
Поднялся на 2 уровня вверх, то-есть перешол в корень каталога(</span>D:\\ ), после чего перешол в папку (-Информатика\ ), потом находим файл (--Контрольная.txt).