Написать программу в паскале вводим число, проверить извлекается из него корень?

Var a,b:integer;
begin
write('a = ');
readln(a);
b:=round(sqrt(a));
if b*b=a
 then writeln('Yes, ',b,' * ',b,' = ',a)
 else writeln('No');
end.

Пример 1:
a = 289
Yes, 17 * 17 = 289

Пример 2:
a = 250
No

Гарантируется правильная работа программы при вводе натуральных чисел, не превышающих 9 223 372 030 926 249 001

var
  i,n,m:int64;
begin
  Write('Вводите: ');
  Read(m);
  n:=0;
  for i:=1 to m div 2 do
    begin
      n:=n+2*i-1;
      if (n>=m) then break
    end;
  if n=m then Writeln('Кв.корень(',m,')=',i)
  else Writeln('Кв.корень(',m,') не является целочисленным')
end.

Примеры работы программы

Вводите: 255240500157504
Кв.корень(255240500157504)=15976248

Вводите: 225
Кв.корень(225)=15

Вводите: 56846356333463
Кв.корень(56846356333463) не является целочисленным

Вводите: 9223372030926249001
Кв.корень(9223372030926249001)=3037000499

Появившиеся в последней четверти ХХ века нанотехнологии стремительно развиваются. Едва ли не каждый месяц появляются сообщения о новых проектах, казавшихся еще год-другой назад абсолютной фантастикой. По определению, данному пионером этого направления Эриком Дрекслером, нанотехнология - "ожидаемая технология производства, ориентированная на дешевое получение устройств и веществ с заранее заданной атомарной структурой". Это значит, что она оперирует с отдельными атомами для того, чтобы получить структуры с атомарной точностью. В этом коренное отличие нанотехнологий от современных "объемных" bulk-технологий, которые манипулируют макрообъектами.

1. программа это описание на формальном языке понятном компьютеру последовательности действий которые необходимо выполнить над данными для решения поставленной задачи
2. системное программное обеспечение включает в себя операционную систему и сервисные программы
3.операционная система это комплекс программ обеспечивающих совместное функционирование всех устройств компьютера и предоставляющих пользователю доступ к ресурсам компьютера
4.аппаратный Интерфейс - это средства обеспечивающие взаимодействие между устройствами компьютера для обеспечения совместного функционирования аппаратного обеспечения компьютера составляющая операционные системы входят драйверы драйверы это устройство специальные программы управляющие работой подключенных к компьютеру устройств
5.пользовательский Интерфейс это средства обеспечивающие взаимодействие человека и компьютера
6.русский компьютера это последовательная загрузка программ операционной системы из долговременной памяти в оперативную память компьютера
7.сервисные программы это различные программы обслуживающие диски программы-архиваторы программы для борьбы с компьютерными вирусами коммуникационные программы и многие другие