Регистрация
Dara005
23.09.2020 19:15
Информатика
Есть ответ 👍

Составить программу именно в №3 последовательно вводятся n целых чисел. сосчитать сколько из них с первым числом.

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

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

марина1929
марина1929
4,5(78 оценок)
Var k,n,p1: integer; begin writeln('vvedite chislo'); readln(p1); n: =0; repeat writeln('vvedite chislo'); readln(k); if (k=p1) then n: =n+1; until k< > -100 write('kol-vo sovpadeniy = ',n); end.
alinachaiun
alinachaiun
4,8(10 оценок)
Сформируйте одномерный массив из 10 элементов в диапазоне - 

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