Юрист,политолог-самые подходящие под ваши слова.
Var
a, b: integer;
begin
Write('Введите через пробел делимое и делитель: ');
Readln(a, b);
Writeln(a, '/', b, '=', a div b, ', остаток ', a mod b)
end.
Тестовое решение:
Введите через пробел делимое и делитель: 1564 137
1564/137=11, остаток 57
Вам нужно подключить библиотеки iostream и cmath.
там, где у вас две строки #include, впишите в первую <iostream>
и во вторую <cmath>. Должно получиться так :
#include <iostream>
#include <cmath>
var s1,s2: string;
begin
writeln('Введите 2 слова:');
readln(s1);
readln(s2);
if s1[length(s1)]=s2[1]
then writeln('второе слово начинается с той же буквы, которой оканчивается первое слово')
else writeln('последняя буква первого слова отличается от первой буквы второго слова');
end.