даны натуральные числа A и B (B>A).Написать программу, выводящую на экран последовательность натуральных чисел от A до B, не включая A и B
Помогите пожалуйста не могу понять !!!
Ответы
Ответ дал:
0
Program zadanie;
Var a,b,i:integer;
Begin
Writeln('Введите значения A и B, причем B>A (иначе программа не будет исполняться)');
Readln(a,b);
For i:=a To b Do
If (i>a) and (i<b) Then Write(i,',');
End.
Var a,b,i:integer;
Begin
Writeln('Введите значения A и B, причем B>A (иначе программа не будет исполняться)');
Readln(a,b);
For i:=a To b Do
If (i>a) and (i<b) Then Write(i,',');
End.
Вас заинтересует
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад