Есть ответ 👍

Будь ласка до іть Складіть проект, у якому виконавець малює рівносторонній трикутник, розміщені по діагоналі Сцени (полотна), якщо довжина сторони першого з низ дорівнює «а» кроків, а довжина сторін кожного наступного на 10 кроків більша за 60 кроків.

227
460
Посмотреть ответы 1

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


Const n = 5; var a: array[1..n] of string;     i,j: integer;     s: string; begin  for i: =1 to n do  begin    write(i,'. ');     readln(a[i]);   end;     for i: =1 to n-1 do  for j: =1 to n-i do  if a[j]> a[j+1] then      begin      s: =a[j]; a[j]: =a[j+1];       a[j+1]: =s;     end;   for i: =1 to n do   write(a[i],', '); end.

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