Photomath вот это приложение
Еще 3D принтеров...
ну а так всё ограничивается только фантазией, знанием и законом
Это все ответы для Интернет урока за 8 класс Информатика.
Лишнее желудь
Так как на всём остальном писали в древности
var
a : integer;
begin
readln (a);
if a > 0 then
a := a +1;
if a <0 then
a := a-2
if a= 0 then
a := 10;
writeln (a);
end.