Создать ментальную карту по теме «Инструментальные средства создания веб-страниц. Основные команды создания веб-страниц, технологии создания веб-страниц

189

230

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

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

mariyudina95

Информатика

4,4(33 оценок)

Var a, b, c, s: integer; begin s: =1; readln(a, b, c); if (a< =0) and (b< =0) and (c< =0) then writeln('среди чисел a, b, c нет положительных чисел') else begin if a> 0 then s: =s*a; if b> 0 then s: =s*b; if c> 0 then s: =s*c; writeln(s); end; end.