Приклад

За умови а<>0 і с<>0 і x<>0 вихідна величина s = a*c*x інакше s=a+c+x.

Для запису умов використовуємо логічну операцію and (i).

Приведемо програму:

Program suma;

Var a, c, x, s:integer;

begin

readln(a,c,x);

If (a<>0)and(c<>0)and(x<>0) then s:=a*c*x else s:=a+c+x;

Writeln(s);

Readln;

End.

2.12.Відомо,що фотоапарат має а Мбайт пам’яті. Дмитро зробив х1 портретів звірят, кожен з яких займає у1 Кбайт пам’яті, х2 фотографій дивних рослин, на кожну з яких необхідно у2 байтів пам’яті та х3 групових знімків членів експедиції, дерев та звірят, що займали у3 Мбайт кожен. Визначте, чи залишилася вільна пам'ять у фотоапараті для фотокарток.