Question

program z2;
Var: a , d ,c ,d1,:Integer;
begin
Writeln('Введите число а');
Readln(a);
Writeln('Введите число d');
Readln(d);
Writeln('Введите число c');
Readln(c);
Writeln('Введите число d1');
d1:= a div (7+7);
c:= a mod (7+28);
Wrireln('Введите число c'; 'Введите чтсло d1');
End.
СРОЧНО ДАЮ 35 БАЛЛОВ. надо найти что не правильно написано и написать правильно

​

Answer 1

- На строке 7 вы пишете `Readln(d)`, но должны были бы написать `Readln(a)`. Это потому, что вы хотите считать число `a` с клавиатуры, а не число `d`.

- На строке 9 вы пишете `Wrireln('Введите число c'; 'Введите число d1')`, но должны были бы написать `WriteLn('Введите число c'); WriteLn('Введите число d1')`. Это потому, что вы используете функцию `Wrireln`, которая не существует в Pascal. Вы должны использовать функцию `WriteLn`, которая выводит строку на экран.

- На строке 10 вы пишете `d1:= a div (7+7)`, но это не правильный способ деления чисел в Pascal. Вы должны использовать оператор `%` для получения остатка от деления. Также вы должны использовать оператор `/` для деления целых чисел. Правильный способ будет так: `d1:= a div (7+7) mod 7`.