Ого! Я последний раз на Паскале писал ~24 года назад :) (и это был тогда Tetris, от нечего делать)
1. заменим {...} на begin ... end
2. заменим цикл for(...) на цикл while ... do
3. заменим = на :=
4. заменим == на =
5. оператора /= нет, заменим на t1=t1 div i;
6. оператора ++ нет, заменим на t:=t+1;
7. заменим t1%i на t1 mod i
8. заменим cout, cin на write(...), read(...)
9. осталось правильно объявить переменные и вместо int main(){...} написать begin ... end. (c точкой на конце)
Как-то так.
https://ru.wikipedia.org/wiki/Паскаль_(язык_програ...
P.S. ну и на C++ что-то недописано:
#include
#include
cout< }
ааа... так это угловые скобки съелись, надо было весь код выделить как код.