Потому что архивторы работают не со всеми типами файлов
Uses crt;
var
a,b,h,S:real;
begin
writeln('Поиск площади трапеции через основание и высоту');
writeln();
write('Введи основание а = ');
readln(a);
<span>writeln(); </span>
write('Введи основание b = ');
<span> readln(b); </span>
writeln();
<span>write('Введи высоту h = '); </span>
readln(h);
S:=h*(a+b)/2;
writeln('Ответ: ',S);
<span>end.</span>
Незачто надеюсь правильно
Ответ 4 отрезка
c 28 до 52
с 55 до 70
со 198 до 202
1000
1.Каждое предложение начинается с заглавной буквы
2.Между словами должен быть пробел
3.После знаков препинания должен быть пробел
4.С стороны знаков "- и =" должен быть пробел