Помогите написать программу на паскале.

"Написать программу, которая позволяет выставлять оценку за работу в зависимости от количества сделанных ошибок."

Question

Информатика

Федотия

5 декабря, 02:47

Помогите написать программу на паскале.

"Написать программу, которая позволяет выставлять оценку за работу в зависимости от количества сделанных ошибок."

+1

Ответы (1)

Знаете ответ?

Артемчик · Answer 1

Program marks;

var

a, b:integer;

begin

Writeln ('Введите кол-во сделанных ошибок: ') ;

readln (a) ;

b:=0;

if a=0 then b:=5;

if (a>0) and (a<=3) then b:=4;

if (a>3) and (a<=5) then b:=3;

if (a>5) then b:=2;

writeln ('Оценка: ', b) ;

readln;

end.

Помогите написать программу на паскале."Написать программу, которая позволяет выставлять оценку за работу в зависимости от количества сделанных ошибок."

Помогите написать программу на паскале.

"Написать программу, которая позволяет выставлять оценку за работу в зависимости от количества сделанных ошибок."