Составьте и выполните программу решения : если между цифрами двузначного числа записать ноль, то полученное трехзначное число будет в 7 раз больше первоначального. найдите это число. паскаль

Если между цифрами двузначного числа записать ноль, то полученное трехзначное число
будет в 7 раз больше первоначального. Найдите это число.

Вариант без строк.

//Pascal
var tmp1, tmp2, i: integer;
begin
for i := 10 to 99 do
begin
  tmp1 := 0; tmp2 := 0;
  tmp1 := (i div 10)*100;
  tmp2 := i mod 10;
  tmp2 := tmp1 + tmp2;
  if tmp2 = i*7 then writeln('Найдено число = ', i);
end;
readln;
end.

Результат:
Найдено число = 15

Думаю, имелось в виду не алгоритм, а программу, так что вот(если имелось в виду именно алгоритм, то напишите в лс):
#include <iostream>
#include <math.h>

using namespae std;

int main()
{
  double x1,y1,x2,y2;
  cin>>x1>>y1>>x2>>y2;
   double m1 = sqrt(x1*x1+y1*y1);
   double m2 = sqrt(x2*x2+y2*y2);
  if(m1 < m2) cout << "Ближе A" << endl;
  else cout << "Ближе B" << endl; /*с учетом иррациональности расстояния между точками почти в большинстве случаев, и неточности плавающих вычислений на компьютере можно пренебречь случаем, когда они равноудалены.*/
 char c; cin >> c;
 return 0;
}

Переносные, компактные и весьма емкие по памяти, по-сравнению с дискетами, мобильные носители информации, в народе называемые просто флешками, получили очень широкой распространение. В настоящее время флеш-носители используются в коммуникаторах, в фотоаппаратах, в некоторых моделях сотовых телефонах и просто как устройство, предназначенное для хранения и переноса информации. Вслед за широким применением флеш-устройств участились и случаи потери информации на них. Связано это либо с поломкой самого устройства, либо с нарушением файловой структуры, либо по вине самого пользователя.
Вне зависимости от типа (формата) устройства: CompactFlash, SD, MMC, MemoryStick, USB-Flash для их производства используются микросхемы памяти, построенные по NAND-технологии (форм-фактор TSOP, WSOP, BGA), что позволяет конструктивно работать непосредственно с самой микросхемой памяти через специальное устройства с дальнейшей расшифровкой полученных результатов. Таким образом, необходимое и достаточное условие для восстановления информации с флеш-носителей – сохранение целостности самой микросхемы памяти и её содержимого.