Даны предложения на языке. в правом столбце дан перевод слов каждого предложения на языке туземцев(слова - id40470120220301 от дашкатопикепи 01.03.2022 06:56

Question

Информатика: Даны предложения на языке. в правом столбце дан перевод слов каждого предложения на языке туземцев(слова даны в произвольном порядке). составьте фрагмент туземско- словаря по этому переводу. мышка ночью пошла гулять. ам, ту,му, ям. кошка ночью видит- мышка. ту,ля бу, ам. мышку кошла пошла поймать. гу,ля, ту,ям

дашкатопикепи · Accepted Answer

Может так?..
а)
Program tt;
var t,z,x,y:integer;
begin
writeln ('Введите x, z, y');
read (x,z,y);
t:=z+x+y;
if x>0 then
Writeln (t,' = TRUE')
else
Writeln (t,' = FALSE')
end.
б)
Program tt;
var t,z,x,y:integer;
begin
writeln ('Введите x, z, y');
read (x,z,y);
t:=z+x+y;
if (x=y) or (y=z) or (x=z) then
Writeln (t,' = TRUE')
else
Writeln (t,' = FALSE')
end.
в)
Program tt;
var A,B,C,t: Real;
begin
Writeln ('Введите коэффициенты: A B C');
Readln(A,B,C);
t := B * B - 4 * A * C;
if t < 0 then
Writeln (t,' = TRUE')
Else
Writeln (t,' = FALSE')
End.

MOGZ ответил