На Pascal?
program hello_world;
Var a,b,c:integer;
begin
Readln(a,b,c);
begin
If (a>b) and (a>c) then write (a);
If (b>c) and (b>a) then write (b);
If (c>b) and (c>a) then write (c);
end;
End.
Комментарий в сочинении – это последовательный анализ исходного текста, где нужно на конкретных примерах из экзаменационного текста объяснить, почему писатель размышляет об этом вопросе и почему использует эти слова и выражения, изобразительно-выразительные средства, для доказательства того, что сформулированная в сочинении проблема действительно присутствует в исходном тексте.
Из данного определения, следует, что комментарий – это рассуждения выпускника по проблеме экзаменационного текста, соотнесенные с его знаниями, личным жизненным опытом.
Объяснение:
mark = int(input())
count = 0
if mark == 5:
count += 1
while (mark<=5 and mark>0):
mark = int(input())
if mark == 5:
count += 1
print(count)
Ввод/Вывод:1
1
5
5
5
5
5
-1
5
Writeln забыла перед скобками написать.