Есть ответ 👍

Напишите программу, которая принимает с клавиатуры целое число х, а затем – серию из 29 дополнительных целых чисел (вводимых с клавиатуры). программа должна определить, сколько чисел в серии были равны значению переменной х, а сколько – были меньше значения переменной х.

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

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


Program z2; var x,i,n,r,m: integer; begin writeln('введите x'); readln(x); i: =1; r: =0; m: =0; while(i< =29) do begin readln(n); if(n=x) then r: =r+1; if(n< x) then m: =m+1; i: =i+1; end; writeln('чисел, равных х  ',r); writeln('чисел, меньше х  ',m); end.

  знания о явлениях (смена времён года), знания о событиях (вов 1941–1945 знания о свойствах объектов (вода может находиться в трёх состояниях), знания о зависимостях между объектами (у квадрата все стороны равны).

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