Составьте программу вычесления суммы всех трехзначных натуральных чисел, кратных 3 и 7....

0 голосов
27 просмотров

Составьте программу вычесления суммы всех трехзначных натуральных чисел, кратных 3 и 7. Пожалуйста помогите срочно((


Информатика (77 баллов) | 27 просмотров
0

На паскаль надо

Дан 1 ответ
0 голосов

Пишу на QBasic
CLS
FOR I = 100 TO 999 
IF I MOD 3=0 OR I MOD 7=0 THEN
C=C+I
END IF
NEXT I
PRINT C

(1.2k баллов)