Home
О нас
Products
Services
Регистрация
Войти
Поиск
Ks1ks1ks
@Ks1ks1ks
August 2021
2
8
Report
Вывести числа от A до B, a и b вводят пользователи
Блок схему и программу на Паскале
Please enter comments
Please enter your name.
Please enter the correct email address.
Agree to
terms of service
You must agree before submitting.
Send
Answers & Comments
MrSolution
Verified answer
Program chisla;
var A,B: LongInt; i: ShortInt;
begin
write('Введите 2 целых числа >>');
readln(A,B);
for i:= A to B
do write(i, ', ');
end.
//Программа выведет подрят через запятую все числа от A до B.
2 votes
Thanks 2
topwkolnik
Verified answer
Program z1;
var a, b, i: integer;
begin
writeln('Введите A:');
readln(a);
writeln('Введите B:');
readln(B);
i := 0;
for i := A to B do
begin
Writeln(i);
end;
end.
2 votes
Thanks 2
×
Report "Вывести числа от A до B, a и b вводят пользователи Блок схему и программу на Пас..."
Your name
Email
Reason
-Select Reason-
Pornographic
Defamatory
Illegal/Unlawful
Spam
Other Terms Of Service Violation
File a copyright complaint
Description
Helpful Links
О нас
Политика конфиденциальности
Правила и условия
Copyright
Контакты
Helpful Social
Get monthly updates
Submit
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
Program chisla;var A,B: LongInt; i: ShortInt;
begin
write('Введите 2 целых числа >>');
readln(A,B);
for i:= A to B
do write(i, ', ');
end.
//Программа выведет подрят через запятую все числа от A до B.
Verified answer
Program z1;var a, b, i: integer;
begin
writeln('Введите A:');
readln(a);
writeln('Введите B:');
readln(B);
i := 0;
for i := A to B do
begin
Writeln(i);
end;
end.