Прошу вас, помогите! Решается оценка! Найдите ошибки в программе 1) Program z1; var a: integer;…

В 1 программе значение переменной а больше чем в цикле и поэтому 10 не меньше 5 и цикл не выполняется 2 ошибка в том, что writeln выводит значение, а после него еще есть условие про аЕсли бы а было меньше пяти, то программа зациклилась из за a: =a+1 , но если бы было меньше пяти и эта строчка была выше writeln (a) , то цикл выполнился Во 2 программе s: =s+a/2 получится не целое число, которое соответсвует типу real И не хватает еще одного действия после s: =s+a/2; там должна участвовать переменная a, чтобы получилась полноценная программа