program raf105;
var abc,a,b,c: integer;
begin
write('Введите трёхзначное число: ');
readln(abc);
a:= abc div 100;
b:= (abc div 10) mod 10;
c:= abc mod 10;
abc:= c*100 + b*10 + a;
writeln('Число наоборот: ',abc);
end.
2.program raf105;
var abc,a,b,c: integer;
begin
write('Введите трёхзначное число: ');
readln(abc);
a:= abc div 100;
b:= (abc div 10) mod 10;
c:= abc mod 10;
abc:= b*100 + c*10 + a;
writeln('Первое число переместили в конец: ',abc);
end.
PascalABC 3.4.2
Системный блок — это элемент персонального компьютера, который защищает компоненты компьютера, находящиеся внутри, от механических повреждений и внешнего воздействия.
Блок – это частица-пазл, используемая для создания кода в Скретч. Блоки крепятся друг к другу с специальных выступов. Существуют блоки событий, команд, репортёры, логические репортёры или блоки конца скрипта. Они имеют свои внутренности и при попытке вставить туда что-то неподходящее, будет синтаксическая ошибка. Много блоков составляют скрипт.
//Microsoft (R) C/C++ Optimizing Compiler Version 19.00.23506 for x64
#include <iostream>
#include <array>
int main()
{
std::array<int, 10> mas = { 1, 5, -4, 9, -6, -2, 7, 8, -5, 0 };
auto it = std::partition(mas.begin(), mas.end(), [](const int& i) { return i < 0; });
std::sort(mas.begin(), it, [](const int& x, const int& y) { return x > y; });
std::sort(it, mas.end(), [](const int& x, const int& y) { return x > y; });
std::copy(mas.begin(), mas.end(), std::ostream_iterator<int>(std::cout, " "));
}