Uses crt;var c,i,j,n:integer;a:array [1..1000] of integer;begin clrscr;read(n);for i:=1 to n doread(a[i]);for i:=1 to n dofor j:=1 to n-1 doif (a[j] mod 10) > (a[j+1] mod 10) then beginc:=a[j];a[j]:=a[j+1];a[j+1]:=cend;for i:=1 to n dowrite(a[i],' ')<span>end.</span>
У, например благодатной почвой для сюжета можно выбрать - Старые сказки на супер-новый лад... Известные герои с неизвестным продолжением... Как вам такое: Буратино исполнилось 35 лет, Мальвина - его жена, у Буратино 5 детей, Карабас Барабас возглавляет мафиозную структуру и так далее... Или рисованный мультик про Чебурашку-каратиста, который работает в сыскном агентстве ...Вариантов много, буду нужен - пишите на ящик.<span>
</span>
4, там через тире написано
истинность это верный/неверный?если так то верный
Для установки операционной системы :
1) Заходим в BIOS и устанавливаем загрузку с CD-ROM
2) Втыкаем в CD-ROM установочный диск
3) Выходим из биоса сохраняя настройки
4. Автоматический ребут ( перезагрузка компьютера )
5. Начинается процесс загрузки с CD ( если только имеет верный формат )
6. Далее всё на русском
После установки :
Программа установки проверяет пк
И вводишь данные
всё.
Сделай лучшим решением заранее благодарен
Составьте программу ввода и вывода массива;3,4,-9,8,1,-6,2,-5,-1,7,5,9.
В ТАБЛО ДАМ ПИЗ Д...
Var a: array[1..50] of Integer;
x,i: integer;
begin
writeln('количество элементов в массиве:');
readln(x);
for i:=1 to x do
begin
readln(a[i]);
end;
for i:=1 to x do
begin
writeln(a[i]);
end;
end.