Регистрация
epstalmakov
17.05.2022 20:27
Информатика
Есть ответ 👍

Написать программы на virtual basic,

197
409
Посмотреть ответы 1

Ответы на вопрос:

kobelevmiklip08h5g
kobelevmiklip08h5g
4,7(4 оценок)
Var     a,n: integer; begin write('a = '); readln(a); for n: = 500 to 1000 do       if n mod 10 = a then write(n,' ') end. пример работы программы: a = 9 509 519 529 539 549 559 569 579 589 599 609 619 629 639 649 659 669 679 689 699 709 719 729 739 749 759 769 779 789 799 809 819 829 839 849 859 869 879 889 899 909 919 929 939 949 959 969 979 989 999

Популярно: Информатика