Write a program for displaying the number of multiples of 3 on the screen, the end of the input is zero (0).
| September 4, 2021 | education
program zvvz1;
var x, y: integer; // set variables of integer type
begin
read (x); // enter the first number of the sequence
while x <> 0 do // organize a loop in which we will enter the numbers of the sequence until we enter zero
begin
if (x mod 3 = 0) then y: = y + 1; // check if the number of the sequence is a multiple of three, then count it
read (x); // enter the next number of the sequence
end;
write (‘The number of numbers in the sequence is multiples of three =’, y); // display the received response
end.
One of the components of a person's success in our time is receiving modern high-quality education, mastering the knowledge, skills and abilities necessary for life in society. A person today needs to study almost all his life, mastering everything new and new, acquiring the necessary professional qualities.
