Помогите пожалуйста составить программу на языке Pascal! Даны три числа, написать программу, подсчитывающую количество чисел, равных нулю.

Ответы:

ЖЕКА КОШКИН

16-04-2017 15:17

var num, count:integer; begin count:=0; for i:=1 to 3 do begin readln(num); if num=0 then count:=count+1 end; writeln(count) end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Наташа Щупенко

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Помогите пожалуйста составить программу на языке Pascal! Даны три числа, написать программу, подсчитывающую количество чисел, равных нулю.» от пользователя Наташа Щупенко в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!