Предмет: Информатика,
автор: ВИРУССССС
даны натуральные числа 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.
Похожие вопросы
Предмет: Математика,
автор: GUUNN
Предмет: Математика,
автор: Аноним
Предмет: Українська література,
автор: vorobejsasa83
Предмет: Физика,
автор: nataliiiilol
Предмет: История,
автор: jarygina2015