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

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

Question

Информатика

Изяслав

26 февраля, 20:51

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

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

+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.

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

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

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