В рейтинге участвует:

групп:

каналов:

Виртуальный сервер на SSD - недорого!

Аренда выделенных и виртуальных серверов (VDS/VPS), хостинг, аренда IP-адресов, администрирование, круглосуточная поддержка

qwarta.ru подробнее

Резервное копирование с проверкой на вирусы!!!

Удобный сервис создания резервных копий на любой сервер сети интернет. Отслеживайте изменения, проверяйте на вирусы. Надежно защитите свой бизнес!

go.backupland.com

Выбираете сервер? Любая конфигурация на заказ!

Аренда физических серверов любых конфигураций под любые запросы - 1С бухгалтерия, игровые сервера, нагруженные проекты, интернет-магазины!

qwarta.ru подробнее

Size: a a a

Ada

97 membersпожаловаться на группу
2021 April 06

卜

卜根 in Ada
в 10.4 наконец завезли контроллируемые типы, ммм
источник
19:56пожаловаться#1

卜

卜根 in Ada
и под макос, и под андроид всем резко стало надо только 64 бита, тоже на старых делфях не очень сидеть
источник
19:58пожаловаться#2

卜

卜根 in Ada
делфи на макосе 32битный, а ада на макосе 64битная, вот и как с этим было жить
источник
20:00пожаловаться#3

АП

Артем Прокопов... in Ada
Ну 10.3.3 я качал что-то раньше, там было что-то мало компонентов связанных с бд, но может сейчас что-то поменялось.
источник
20:11пожаловаться#4

卜

卜根 in Ada
если через какой-нибудь AnyDAC или mORMot работать с БД, оно и мощнее, и для памяти более безопасно
источник
20:15пожаловаться#5

卜

卜根 in Ada
когда качал гнат коммьюнити, там с компонентами для бд было тоже не очень
источник
20:21пожаловаться#6

l

longboi in Ada
анонимность для virgin pythorastов с двача. только alpha chad именованные типы, только харддкор
источник
20:26пожаловаться#7

AV

Alexey Veselovsky in Ada
Паскаль странный https://godbolt.org/z/qvvG7ErEs
godbolt.org
Compiler Explorer - Pascal (x86-64 fpc 3.2.0)
unit output;

interface

function Square(v: array of Integer; i : Integer): Integer;

implementation

// Type your code here, or load an example.

function Square(v: array of Integer; i : Integer): Integer;
begin
   Square := v[i];
end;

end.
источник
20:29пожаловаться#8

AV

Alexey Veselovsky in Ada
очень много кода нагенерил и лишних вызовов
источник
20:29пожаловаться#9

AV

Alexey Veselovsky in Ada
Ада как-то компактней, даже в более сложном случае https://godbolt.org/z/WMh8bKvqz
godbolt.org
Compiler Explorer - Ada (x86-64 gnat (trunk))
pragma Source_File_Name (Test, Body_File_Name => "example.adb");



function Test(i : Integer) return Integer is
   type A is array (Integer range <>)  of Integer;

   function Get_A return A with Import => True;  

   arr : A := Get_A;    
begin
   return arr(i);
end Test;
источник
20:30пожаловаться#10

FO

FORTRAN ONE LOVE in Ada
https://godbolt.org/z/Tj7MEzY6T
godbolt.org
Compiler Explorer - Fortran (x86-64 gfortran 10.2)
! Type your code here, or load an example.
real function square(x)
   implicit none
   real, intent(in) :: x
   square = x * x
   return
end function square
источник
20:53пожаловаться#11

FO

FORTRAN ONE LOVE in Ada
фотртрн маленький
источник
20:53пожаловаться#12

AV

Alexey Veselovsky in Ada
эмм... а где тут массивы?
источник
20:54пожаловаться#13

VM

Victor Miasnikov in Ada
Вы видели проект Strannik?
С Си / Pascal / Modula-2 и, главное, анализом их сходств и отличий?

--

 А модуль SYSTEM для XDS Modula-2/Oberon-2 в ОС Колибри?
источник
20:56пожаловаться#14

FO

FORTRAN ONE LOVE in Ada
https://godbolt.org/z/xroen1Mfq
вот
godbolt.org
Compiler Explorer - Fortran (x86-64 gfortran 10.2)
! Type your code here, or load an example.
function square(x)
   implicit none
   real, dimension(:), intent(in) :: x
   real, dimension(*) :: square(size(x))
   square = x * x
   return
end function square
источник
20:56пожаловаться#15

AV

Alexey Veselovsky in Ada
идея то была в том, чтобы сравнить как паскаль и ада проверяют выход за границы массивов
источник
20:56пожаловаться#16

FO

FORTRAN ONE LOVE in Ada
https://godbolt.org/z/3YxMao11e
но лучше было сделать так :)
godbolt.org
Compiler Explorer - Fortran (x86-64 gfortran 10.2)
! Type your code here, or load an example.
real elemental function square(x)
   implicit none
   real, intent(in) :: x
   square = x * x
   return
end function
источник
20:57пожаловаться#17

AV

Alexey Veselovsky in Ada
у меня ощущение, что ты тут матрицы перемножаешь...
источник
20:57пожаловаться#18

W

Wild_Wind in Ada
Это он, наверное, уже на рефлексах :)
источник
20:58пожаловаться#19

AV

Alexey Veselovsky in Ada
ну, а что еще с массивами делать? ТОЛЬКО ПЕРЕМНОЖАТЬ!
источник
20:58пожаловаться#20