Регистрация
Dayanna01
24.01.2023 08:15
Информатика
Есть ответ 👍

Запишіть фрагмент програми мовою програмування free pascal для виконання такої дії: Обчислюється добуток парних чисел першого десятка

261
473
Посмотреть ответы 1

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

валя357
валя357
4,7(62 оценок)
Program znanija; var a,b,c: integer; znanijacom: array [1..12] of integer; begin a: =12; for b: =1 to 12 do begin znanijacom[b]: =random(5+1); if znanijacom[b]=5 then c: =c+1; end; writeln('5 получили ',c,' человек'); end.

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