Ответы
Ответ дал:
1
Ответ:
program z1;
var k,a,b:integer;
begin
k:=0;
if(a>=0) then k:=k+1;
if(b>=0) then k:=k+1;
write(k);
end.
Объяснение:
Данный алгоритм неполный, т.к. у нас нигде не объявляется A и B
Если необходимо вводить эти данные с клавиатуры, то необходимо между k:=0 и if... добавить:
read(a);
read(b);
Если вы их объявляете сами, то между теми же строками добавьте значение (ниже указал пример):
a:=1;
b:=-1;
Вас заинтересует
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад