Question

СПАСИТЕ, ЧЕРЕЗ 20 МИНУТ СДАВАТЬ УМОЛЯЮ, ПОМОГИТЕ, НЕ МОГУ НИЧЕГО НА ДИСТАНТЕ ПОНЯТЬ Найдите ошибку и запишите в тетрадь строку с исправлением2. Программа для вычисления среднего возраста детей.var z1,z2:real;beginreadln(z1,z2);writeln(z1+z2/2);end.3. Программа для нахождения суммы цифр двузначного числа.var x,z1,z2:real;beginreadln(x,z1,z2);z1:=x div 10;z2:=x mod 10;writeln(z1+z2);end.​

Answer 1

Відповідь:

Пояснення:

2.Вычисляется сумма возраста первого ребенка и половина возраста второго, используйте скобки:

writeln((z1+z2)/2);

3.Тут бы следует исправить ввод

readln(x);, так как нам по условию нужно только двухзначное число, с формулами тут в порядке

P.S.: используйте целое вычисление

var x,z1,z2:integer;, так как div и mod целочисленны в Паскале

Answer 2

В программе для вычисления среднего возраста детей есть несколько ошибок. Первая ошибка - отсутствует символ ";" после объявления переменных z1 и z2. Вторая ошибка - при вычислении среднего возраста используется неправильная формула. Вместо z1 + z2 / 2 должно быть (z1 + z2) / 2.

Исправленная программа для вычисления среднего возраста детей будет выглядеть следующим образом:

var z1, z2: real; begin readln(z1, z2); writeln((z1 + z2) / 2); end.

В программе для нахождения суммы цифр двузначного числа также есть несколько ошибок. Первая ошибка - переменная x объявляется, но не используется в программе. Вторая ошибка - неправильно используются операторы div и mod. Для разделения числа на десятки и единицы нужно использовать операции деления нацело и остаток от деления на 10.

Исправленная программа для нахождения суммы цифр двузначного числа будет выглядеть следующим образом:

var x, z1, z2: integer; begin readln(x); z1 := x div 10; z2 := x mod 10; writeln(z1 + z2); end.