Составить алгоритм решения с алгоритмического языка псевдокода и с блок-схем, используя конструкцию алгоритма с ветвлением. 1. определить, можно ли из отрезков с длинами х, y построить квадрат.
А)заполним водой 4х литровый сосуд и выльем его в семилитровый .в семилитровом останется место для 3 литров опять наберём 4х литровый сосуд и выльем в 7 литровый сосуд так как там осталось 3 литра то в 4х литровом сосуде останется литр. б)заполним водой 4х литровый сосуд и вылем в 7литровый сосуд опять наберём 4х литровый сосуд и выльем 7 литровый наполнится а в 4х литрово останется 1 литр.Выльем всё из 7 литрового сосуда и нальём литр из 4х литрогого теперь опять наберём 4х литровый и выльем в 7 литровый там будет пять литров.
1 программа:
var x, y, t:integer;
begin
for x:=3 to 15 do begin
writeln('x = ', x);
t := x - 2;
y := 7*t*3-6*t+10;
writeln('y = ', y);
writeln('');
end;
end.
2 программа:
const pass ='45xlua';
var x:string;
a:boolean;
begin
a:= false;
while a<>true do begin
writeln('Введите пароль');
readln(x);
if x = pass then begin
a:=true;
writeln('Пароль верный');
end
else
writeln('Пароль неверный, введите еще раз');
writeln('');
end;
end.
4 программа:
var a, a1, a2, x, kol:integer;
begin
writeln('Введите четырёхзначное число');
readln(a);
x := a;
while x<>0 do begin
x:= x div 10;
kol:= kol + 1;
end;
if (kol = 4) then begin
a1 := a div 100;
a2:= a mod 100;
writeln(a1+a2);
end
else
writeln('Число не является четырёхзначным');
end.