Паскаль.

Сменой знака считается переход от отрицательного к нулю, от нуля к положительному, от отрицательного к положительному и наоборот. По крайней мере в условии не сказано обратное.

program progr1;

var count,i,n,x,znak,znak_old:integer;
begin
write('n-> '); readln(n);
count:=0;
for i:=1 to n do
begin
write(i,'-> '); readln(x);
if x < 0 then znak:=-1;
if x>0 then znak:=1;
if x=0 then znak:=0;
if i < > 1 then
if znak < > znak_old then count:=count+1;
znak_old:=znak;
end;
write('count=',count);
readln;
end.

0 0

4 года назад

Для какого числа Х истинно высказывание (X>2)v(X>5)->(X<3) 1) 5 2) 2 3) 3 4) 4

Lllooooo

Вариант 2.
подставляем: 2>2(нет,значит ложно - пишем 0)
2>5(нет,ложно - 0)
0V0=0
2<3(истинно - 1)
0----->1 = 1(Истинно)
обратите внимание на таблицы конъюнкции,дизъюнкции и следстия

0 0

3 года назад

Дано 3 целых числа. Определить среди них максимальное четное. Написать это на C++

nastvarennickova

#include <iostream>

#include <algorithm>

int main()

{

int arr[3];

for(int i = 0; i < 3; i++)

std::cin >> arr[i];

int max = arr[0];

for(auto& i : arr)

{

if(i > max && (i % 2 == 0))

max = i;

}

std::cout << "Результат = " << max << std::endl;

}

0 0

4 года назад

Программа-психотерапевт. Пользователь говорит, программа ничего не отвечает. Когда пользователь закончил говорить, он говорит "С

ghh1 [1]

Ответ:

stroca = input()

summa = 0

while stroca != 'Спасибо.':

summa += 1

stroca = input()

summa += 1

print(summa)

Объяснение:

0 0

4 года назад