Var
a,p,s:real;
begin
Write('Введите площадь квадрата: ');
Readln(s);
a:=sqrt(s);
p:=4*a;
Writeln('Периметр квадрата равен ',p)
end.
Тестовое решение:
Введите площадь квадрата: 13.7
Периметр квадрата равен 14.8054044186574
<span>N=A+B+C-N
</span>Если N=A+B, то N=A+B+C-N=A+B+C-С=A+B, следовательно N=C
<span>N=A
IF N > В THEN N = В (это условие надо нарушить A<B)
IF N < C THEN N = C </span>(это условие надо сделать A<С)
A<B и A<С
<span>
Ответ: </span><span>в) А < В и А < С</span><span>
</span>
Формальные языки потребовались людям затем, чтобы писать музыку, понимать знаки дорожного движения, чтобы люди с нарушением слуха могли общаться с помощью жестов, шифровать информацию (азбука Морзе), писать программы на языках программирования.
Ответ:
Зайди в статус, нажми на 3 точки и "Приватность статуса", а там на "Мои контакты"