ПОМОГИТЕ ПОЖАЛУЙСТА! Осоставить программу…

Question

ПОМОГИТЕ ПОЖАЛУЙСТА! Осоставить программу, которая запрашивает 2 числа если они оба четные, то сумма. Если они разные то найти произведения

Answer 1

75

goodday

18 марта 2023

vara,b,pr,pr1: real; beginread (a,b); if (a mod 2)=0) and (b mod 2)=0) thenpr: =a+b; if a<>b then pr1: =a*b; write (pr,pr1); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить