contact
?>

Написать слова: веб сайт , веб страница , провайдер , тэг , хостинг , гипер ссылка. на , понятном «человеческом» языке

Информатика

Ответы

mel9152480522
Веб сайт, веб страница,провайдер,тэг,хостинг,гипер ссылка
И если что ты сам всё правильно написал)
brovkinay
// PascalABC.NET 3.1, сборка 1230 от 27.04.2016 - №1
begin
  var a,b,c:integer;
  Write('Введите три натуральных числа: '); Read(a,b,c);
  var s:=a+b+c;
  var k:=Trunc(sqrt(s));
  if k*k=s then Writeln('Сумма чисел - квадрат ',k)
  else Writeln('Сумма чисел не является квадратом целого')
end.

Тестовое решение
Введите три натуральных числа: 13 4 8
Сумма чисел - квадрат 5

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016 - №2
begin
  var a,b,c:integer;
  Write('Введите три натуральных числа: '); Read(a,b,c);
  var s:=power(a*b*c,1/3);
  if s=int(s) then Writeln('Среднее геометрическое - целое число')
  else Writeln('Среднее геометрическое - нецелое число')
end.

Тестовое решение
Введите три натуральных числа: 16 8 15
Среднее геометрическое - нецелое число
nadnuriewa8110

begin

writeln('1: ',(sqrt(10)+1)/(6.25-1.8*1.8));

writeln('2: ',sin(5)/cos(5)*10*sqrt(19));

writeln('3: ',100*sin(4));

writeln('4: ',sin(cos(1))/0.25);

writeln('5: ',exp(sin(3))*ln(2));

writeln('6: ',sqrt(sqrt(5)+sqrt(6)));

writeln('7: ',(sqrt(3)+2*sqrt(2))/sqrt(sqrt(5)));

writeln('8: ',(exp(sin(3))*ln(2)+exp(sin(2))*ln(2))/(exp(2.4)*ln(4)+1));

end.

Результат:

1: 1.38281649839481

2: -147.353232893516

3: -75.6802495307928

4: 2.0575810340942

5: 0.798202533367663

6: 2.16461491269994

7: 3.04977540329462

8: 0.0980510445730408

Подробнее - на -

Объяснение:

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Написать слова: веб сайт , веб страница , провайдер , тэг , хостинг , гипер ссылка. на , понятном «человеческом» языке
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Japancosmetica
dobrovolsky-tmz1
mrilyushchenko6
maxchemaxim14
gen218
Aleksandrovich-Yurevna1421
andyrvo
Vitalevich
Azarova Anastasiya1707
Valentinovna
suxoruchenkovm171
Yelena Kotova
marver201040
yliana
Владимирович