Регистрация
grechko8885
14.04.2020 18:10
Информатика
Есть ответ 👍

Десятичное число 51,53 перевести в шестнадцатеричную и восьмеричную сс деления и умножения.

158
477
Посмотреть ответы 1

Ответы на вопрос:

васеня220044
васеня220044
4,6(53 оценок)
// pascalabc.net 3.2, сборка 1381 от 04.02.2017 // внимание! если программа не работает, обновите версию! type   point=(real,real); procedure getpoint(var q: point); begin   var a,b: real;   write('введите координаты точки: '); read(a,b);   q: =(a,b) end; function distance(a: point): =sqrt(sqr(a[0])+sqr(a[1])); begin   var a,b: (real,real);   getpoint(a);   getpoint(b);   var d1: =distance(a);   var d2: =distance(b);   if d1< d2 then writeln('первая точка ближе')   else       if d1> d2 then writeln('вторая точка ближе')       else writeln('точки равноудалены') end. пример введите координаты точки: 13.7 -11.25 введите координаты точки: 18 12.4 первая точка ближе

Популярно: Информатика