// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!

begin
 var s:=Arr('Клиндухова','Кобзарь','козловский','капша','мороз Артем',
 'Мороз ИЛья','Павлова','Глухих');
 s.Println;
 s:=s.OrderBy(t->t.ToUpper).ToArray;
 s.Println
end.

0 0

3 года назад

5. Выразите в виде предложения на русском языке смысл математического выражения: (10+11+12+13+14+15) х 19 2 --------------------

Папа20008

Сумму натуральных чисел от 10 до 15 умножить на 19, уменьшить в 5 раз и прибавить две третьих

0 0

1 год назад

Прочитайте сказку о Труфоляндии. ТРУФОЛЯНДИЯ – КОРОЛЕВСТВО ЛЖИ И ИСТИНЫ Много лет назад Очень Правдивый Принц полюбил очаровате

nikolayr30

Если это из олимпиады по основам наук, то там ответ под цифрой 5, где деревянный домик у реки.

0 0

3 года назад

Напишите программу на языке Паскаль, которая будет вычислять наибольший общий делитель для двух целых чисел а) с помощью repeat

Андрей21

а)

var a,b:integer;

begin

read(a,b);

repeat

if a>b then

a:=a-b

else

b:=b-a;

until (a=b);

write(a);

end.

б)

var a,b:integer;

begin

read(a,b);

while (a<>b) do

if a>b then

a:=a-b

else

b:=b-a;

write(a);

end.

0 0

3 года назад