Регистрация
Qqertyi
11.04.2022 02:56
Информатика
Есть ответ 👍

Вычислите значения следующих логических выражений,записанных на паскале: а) k mod 7 = k div 5 -1 при k=15; б) odd (trunc(10*p) )при p=0,182; в) not odd(n) при n=0; г) t and (p mod 3 = 0) при t=true,p=10101; д) (x*y < > 0) and (y > x)при x=2, y=1; е) a or not b при a=false,b=true.

144
500
Посмотреть ответы 2

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

karina24264
karina24264
4,8(18 оценок)
А)  k mod 7 = k div 5 -1  ⇒ 15 mod 7 = 15 div 5-1  ⇒ 1 = 3-1  ⇒1=2⇒false б)  odd (trunc(10*p) )⇒odd (trunc(10*0,182) )⇒odd (trunc(1,82) )⇒odd(1)⇒true в)  not odd(n)⇒not odd(0)⇒not false⇒true г)  t and (p mod 3 = 0)⇒true  and (10101 mod 3 = 0)⇒true and true⇒true д)  (x*y < > 0) and (y > x)⇒(2*1< > 0)and(1> 2)⇒true and false⇒false е)  a or not b⇒false or not true⇒false or false⇒false
mariesoe
mariesoe
4,8(81 оценок)

var

  a : array [1..100] of real;

  n, i : integer;

  flag : boolean;

  sum : real;

begin

  read (n);

  for i : = 1 to n do read (a[i]);

  flag : = false; sum : = 0;

  for i : = n downto 1 do

    if flag then sum : = sum + a[i]

    else if a[i] > 0 then flag : = true;

  writeln (sum);

end.

Популярно: Информатика