Есть ответ 👍

заполнить таблицу истинности

283
332
Посмотреть ответы 1

Ответы на вопрос:

Victor789
4,5(50 оценок)

Const   students = 20; var   marks: byte : = students; begin   writeln('все пришли? ');   var c: string;   readln(c);   if not (c in ['yes', '1', 'true', 'да']) then   begin     writeln('сколько не пришло? ');     var b: byte;     readln(b);     marks : = (marks > b ? marks - b : 0);     end;   writeln(marks, ' оценок'); end.

Популярно: Информатика