10 принципів інтуїтивного харчування. Як, як же стаття інтуїтивним едоком? Tri до вам цим, Tribole та Resch розробили 10 принципів інтуїтивного харчування, які всі створені для створення більш здорових відносин з едою. «Принципи інтуїтивне піти ня ня орієнтирів орієнтирів орієнтири орієнтирів орієнтирів орієнтирів орієнтири дієта дієта дієта дієта дієта дієта дієта дієта дієта дієта дієта дієта дієта дієта дієта . «Несмотря н то
Program Zadacha197;
uses crt;
var i, k, a:integer;
BEGIN
writeln('Введите а');
readln(a);
i := 0;
k := 1;
while (a<>0) and (k < 1000) do
begin
if (a mod 3 = 0) and (abs(a) <= 30000) then i := i + 1;
k := k + 1;
readln(a);
end;
writeln(i, '- количество четных чисел, кратных трём.');
END.
- while (a<>0) and (k < 1000) эту часть кода можно понять так, пока введенное число не равно нулю и количество введенных чисел не превышает 1000 то выполняется программа.
- if (a mod 3 = 0) and (abs(a) <= 30000) если введенное число делится на три без остатка и по модулю введенное число меньше 30000 то выполняется данное условие.
- i эта переменная у нас считает количество чисел кратных трём.
- k эта переменная считает количество введенных чисел во время использования программы.
- a эта переменная вводится пользователем.
Program Zadacha197;
uses crt;
var i, k, a:integer;
BEGIN
writeln('Введите а');
readln(a);
i := 0;
k := 1;
while (a<>0) and (k < 1000) do
begin
if (a mod 3 = 0) and (abs(a) <= 30000) then i := i + 1;
k := k + 1;
readln(a);
end;
writeln(i, '- количество четных чисел, кратных трём.');
END.
- while (a<>0) and (k < 1000) эту часть кода можно понять так, пока введенное число не равно нулю и количество введенных чисел не превышает 1000 то выполняется программа.
- if (a mod 3 = 0) and (abs(a) <= 30000) если введенное число делится на три без остатка и по модулю введенное число меньше 30000 то выполняется данное условие.
- i эта переменная у нас считает количество чисел кратных трём.
- k эта переменная считает количество введенных чисел во время использования программы.
- a эта переменная вводится пользователем.
10 принципів інтуїтивного харчування. Як, як же стаття інтуїтивним едоком? Tri до вам цим, Tribole та Resch розробили 10 принципів інтуїтивного харчування, які всі створені для створення більш здорових відносин з едою. «Принципи інтуїтивне піти ня ня орієнтирів орієнтирів орієнтири орієнтирів орієнтирів орієнтирів орієнтири дієта дієта дієта дієта дієта дієта дієта дієта дієта дієта дієта дієта дієта дієта дієта . «Несмотря н то
Объяснение: