Program bar; var a,b,c: intenger; begin read(a,b) if a=b then begin c: =(a*b)/2 write(c) end else write(a,b); end. кому не трудно у кого есть программа паскаль введите туда им любой числом то что вышло напишете заранее

норрд норрд    1   11.07.2019 01:10    0

Ответы
Артём1228777 Артём1228777  19.08.2020 08:29
Если а=б, то выведет a*b/2
иначе выведет а и б
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика