написать листинг программы по теме циклы (циклы - вопрос №11033082 от 85kurganova85 02.05.2022 03:34

Question

Информатика: написать листинг программы по теме циклы (циклы с параметром (for)). Задания следует решать с организацией цикла с параметром: Вводятся 8 чисел. Определить, сколько среди них чисел равных 3.

85kurganova85 · Answer

var i,a,k:integer; begink:=0;for i:=1 to 8 do begin readln (a); if a = 3 then k:=k+1 end; writeln (k)end....