Плз решить в qbasic 1.даны два действительных числа - вопрос №25232801 от basemaker 28.11.2020 22:39

Question

Информатика: Плз решить в qbasic 1.даны два действительных числа a и b. вывести первое число, если оно больше второго, и оба числа, если это не так. 2.даны два действительных числа a и b . заменить первое число нулём, если оно меньше или равно второму, и оставить числа без изменения в противном случае.

basemaker · Answer

1)CLSDIM A AS REALDIM B AS REALINPUT AINPUT BIF A B THEN  PRINT AELSE  PRINT A  PRINT BEND IF2)CLSDIM A AS REALDIM B AS REALIF A =B THEN  A=OEND IFPRINT APRINT B  ...