Прога А на ABCPaskal^
Progaram sdaef;
var S, i: real;
label cikl;
S:=0;
i:=10;
if i>5 then begin
cikl:
S:=S+i;
i:= i-1
If i> 5 then goto cikl;
else
writeln (S);
end;
end.

0 0

4 года назад

Помогите решить пожалуйста 1 и 2.Очень сложно оказалось

Oleynik [31]

№2:
а) Пусть a = "Иван внук Петра", b = "Иван внук Дарии", тогда высказывание можно записать как: a ∧ b.
б) Пусть a = "при высокой доле рынка темпы рынка низкие",
b = "продукт относится к категории 'денежного мешка' ",
c = "продукт относится к категории 'дойной коровы' "
d = "продукт дает большие доходы",
f = "продукт характеризуется малыми затратами в связи со стабильностью рынка", тогда можно представить так:
a -> ((b ∨ c) ∧ (d ∧ f))

0 0

4 года назад

Написать программу для выполнения задачи y=5-x в степени 2 /2

Осознанный [50]

Var
y,x: integer;
begin
read(x);
y:=(5-x)^(2/2);
write(y);
end.

0 0

4 года назад

Придумать две задачи на использование цикла

Ден4647658

1) заполнить и вывести матрицу вида
11111
01110
00100
01110
11111
2) <span>заполнить и вывести матрицу вида
</span> 00100
01110
11111

0 0

4 года назад