Другие языки программирования и технологии

Напишите комментарии к каждой строчке

else - иначе
Beka S
Beka S
76 634
Лучший ответ
Так и быть, напишу:

program primer; {Указываем название программы (primer)}
var m,n:integer; {Объявляем 2 целочисленных переменных m и n}
begin {Начало программы }
readln(m,n); {Читаем значения m и n (ввод) }
if m<>n then {Если m не равен n, тогда}
begin {Начало блока}
if m>n then {Если m больше n, тогда}
n:=m {n присваиваем значение m}
else {иначе (m меньше n) }
m:=n; {m присваиваем значение n }
end {Конец блока}
else {Иначе (m и n равны) }
begin {Начало блока}
m:=0; {m присваиваем значение 0}
n:=0; {n присваиваем значение 0}
end; {Конец блока}
writeln(m,' ',n); {Вывод значений m и n через пробел}
end. {Конец программы}

PS: В следующий раз текст программы выкладывай, а не картинку.
Ныяз Токтобаев
Ныяз Токтобаев
88 778
end. - конец программы
begin - начало
Народ, чё, поможем человеку, а? С миру по строчке. . Вот, например,
m:=0; - сделать m равным 0
Борис Галимов
Борис Галимов
65 165
Тебе лень переписать текст с экрана, почему нам должно быть не лениво к каждой строчке комментарии писать? Это высшая форма неуважения к людям с твоей стороны.
В комментариях надо писать то, что непонятно ко коду.

Для вашей программы достаточно двух комментариев:
1. перед вторым if: замена мининимального числа на максимальное
2. перед присвоением 0: когда оба числа равны, обнулим их

Правила хорошего тона требуют добавить после program следующую информацию:
1. автор
2. краткое описание задачи
3. дату написания
Umid Sultanmuratov
Umid Sultanmuratov
11 112

Похожие вопросы