8.11 напиши программу которая принимает с клавиатуры 2 числа 1 количество учеников в классе, 2 количество стульев в классе программа проверит соответствие между двумя соответствиями и выведет на экран соответствующие цифры например 35, 39 разделить на экран проводит 4 лишних.

100

179

Посмотреть ответы 2

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

Полина260106

Информатика

4,7(53 оценок)

Pascal: type cl=class public children: integer; f: integer; ff: integer; end; var c: cl; begin c: =new cl; writeln('введите кол-во учеников: '); read(c.children); writeln('введите кол-во стульев: '); read(c.f); if c.children> c.f then begin writeln('некорректное значение (учеников < стульев)'); halt; end; c.ff: =c.f mod c.children; writeln('кол-во учеников: ',c.children); writeln('кол-во стульев: ',c.f); writeln('кол-во лишних стульев: ',c.ff); end. (если учеников больше, чем стульев, программа закроется с уведомлением. если учеников столько же, сколько и стульев или меньше, то напишет кол-во лишних стульев).

НЕВЕСОМАЯ67

Информатика

4,8(22 оценок)

Вроде правильно const n= ; (поставь любое положительное число, это количество элементов в массиве) var a: array [1..n] of real; i: integer; min: real; begin for i: =1 to n do begin readln (a[i]); writeln ('a[i', i, ']=', a[i]); end; min: =a[i]; for i: =1 to n do if a[i] mod 3=0 then if a[i]< min then min: =a[i]; if (a[1]=min) and (a[1] mod 3< > 0) then writeln ('нет чисел, делящихся на 3') else writeln (min); end.