Есть ответ 👍

Много ! составить понятную программу используя условный оператор if,then,else: известны оценки ученика по пяти предметам,верно ли что среди них нет троек

136
237
Посмотреть ответы 1

Ответы на вопрос:

woof3228
4,8(96 оценок)

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; beginread(k); if k-1 div 7=k-1/7 then n: =7 elseif k div 7=k/7 then n: =6 elseif k+1 div 7=k+1/7 then n: =5 elseif k+2 div 7=k+2/7 then n: =4 elseif k+3 div 7=k+3/7 then n: =3 elseif k+4 div 7=k+4/7 then n: =2 elseif k+5 div 7=k+5/7 then n: =1;   writeln(n); end.

Популярно: Информатика