написать листинг программы по теме циклы (циклы - вопрос №11032580 от Астар 11.07.2021 23:36

Question

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

Астар · 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....