Var x,b,c,i :integer; begin c:=0; writeln ('Введите первое число'); readln (x); writeln ('Введите второе число'); readln (b); if (x=8) and (b=5) then c:=x*b; writeln ('=',c); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
