Для трех логических переменных делаем таблицу из 8 строк:
1. Подсчет количества чисел из диапазона [1, 100], кратных 7.
2. В цикле ОШИБКА, причет очень грубая. Скорее всего, автор задачи хотел найти сумму чисел из диапазона от 1 до 10, которые кратны 3 и не кратны 9. Но в данном случае ничего вычисляться не будет из-за ошибки (будет зацикливание).
3. Вычисление среднего арифметического четных чисел из диапазоне от 10 до 99. Тоже написано очень коряво.
Я думая так: Прогулка отменяется, идет дождь я останусь дома
Var a, b: real;
{а – возраст Маши; b – возраст Cаши}
begin
readln (a, b);
if A>B then
writeln ('Маша старше Саши')
else if a=b then
writeln('Саша и Маша ровесники')
else
writeln ('Саша старше Маши');
readln;
<span>end.</span>
В таких случаях у файлов "двойное" расширение - *.tar.gz
и, кстати, tar - не архиватор. утилита tar собирает несколько файлов в один, так как архиватор gzip может архивировать только один файл.