Паскаль.найдите 10 первых натуральных чисел оканчивающихся на 7

0 интересует 0 не интересует
124 просмотров

Паскаль.найдите 10 первых натуральных чисел оканчивающихся на 7


спросил от Начинающий (442 баллов) в категории Информатика
1 Ответ
0 интересует 0 не интересует
ответил от Одаренный (3.4k баллов)

Program znanija3;
var i, number:integer;
begin
   number:=0;
   while i <> 10 do begin
     Inc(number);
     if (number mod 10) = 7 then begin
       writeln(number);
       Inc(i);
     end;
   end;
end.


P.S. Inc(number) = number:= number+1

оставил комментарий от Одаренный (3.4k баллов)
0 0

number:=number + 1

оставил комментарий от Начинающий (442 баллов)
0 0

а number как заменить, ибо не понимаю что это

оставил комментарий от Одаренный (3.4k баллов)
0 0

number это переменная

оставил комментарий от Одаренный (3.4k баллов)
0 0

её не надо заменять

оставил комментарий от Начинающий (442 баллов)
0 0

спасибо, поняла

оставил комментарий от Начинающий (442 баллов)
0 0

но все равно что такое inc? хочется его заменить понятнее

оставил комментарий от Одаренный (3.4k баллов)
0 0

я же написал number:=number+1

оставил комментарий от Начинающий (442 баллов)
0 0

Inc(i); а здесь тогда как?

оставил комментарий от Одаренный (3.4k баллов)
0 0

I:=I+1

оставил комментарий от Одаренный (3.4k баллов)
0 0

i:=i+1

...