👤

Помогите пожалуйста
Определить количество натуральных чисел, кратных числу 7, из интервала от 100 до 500.


Răspuns :

Răspuns:

Program p1;

var a: Integer;

begin

for a:= 98 to 500 do

begin

if a mod 7 = 0 then

writeln(a);

end;

end.

Vă mulțumim că ați vizitat site-ul nostru dedicat Informatică. Sperăm că informațiile oferite v-au fost de ajutor. Dacă aveți întrebări sau nevoie de asistență suplimentară, nu ezitați să ne contactați. Ne vedem curând și nu uitați să ne adăugați la marcaje!


Go Studies: Alte intrebari