А: сумма двух целых чисел - вещественное число, ок B: корень из целого числа (если оно положительно) - вещественное число, ок C: частное целого и вещественного числа - целое число - неверно. (Например, если A = 1, C = 2 - частное не целое) D: сумма целого и вещественного числа - вещественное число, ок.
A)var k,n:integer; begin read(k); if k div 7=k/7 then n:=7 else if k+1 div 7=k+1/7 then n:=6 else if k+2 div 7=k+2/7 then n:=5 else if k+3 div 7=k+3/7 then n:=4 else if k+4 div 7=k+4/7 then n:=3 else if k+5 div 7=k+5/7 then n:=2 else if k+6 div 7=k+6/7 then n:=1; writeln(n); end. б)var k,n:integer;begin read(k); if k-1 div 7=k-1/7 then n:=7 else if k div 7=k/7 then n:=6 else if k+1 div 7=k+1/7 then n:=5 else if k+2 div 7=k+2/7 then n:=4 else if k+3 div 7=k+3/7 then n:=3 else if k+4 div 7=k+4/7 then n:=2 else if k+5 div 7=k+5/7 then n:=1; writeln(n); end.
B: корень из целого числа (если оно положительно) - вещественное число, ок
C: частное целого и вещественного числа - целое число - неверно. (Например, если A = 1, C = 2 - частное не целое)
D: сумма целого и вещественного числа - вещественное число, ок.
ответ B