alarm
Задайте вопрос
Информатика
John

вывести на экран кубы чисел a и b, числа вводит пользователь. НЕ ПАСКАЛЬ НУЖЕН ПИТОН ДАЮ 100 поинтов​

ответы: 1
Зарегистрируйтесь, чтобы добавить ответ
Ответ:

решения задачи используется цикл for

var

a, b: integer;

begin

write('A: '); readln(a);

write('B: '); readln(b);

if a < b then

for a := a to b do

writeln (a * a * a);

readln;

end.

Пользователь может ввести значения так, что a будет больше b. В таком случае цикл for не выполнится.

Действительно, if здесь лишнее. Оно имеет смысл только в случае, когда обрабатывается ситуация, где значение b меньше, чем a:

var

a,b:integer;

begin

write('A: '); readln(a);

write('B: '); readln(b);

if a < b then

for a:=a to b do

writeln(a*a*a)

else

for a:=a downto b do

writeln(a*a*a);

end.

366
vomit
Чтобы ответить необходимо зарегистрироваться.

Другие вопросы: - Информатика

НАДО СОСТАВИТЬ БЛОК-СХЕМУФункция

ДАЮ 30 поинтовЕсли n=5, то вывод

напиши наименьшее целое число дл

Проверка правильности и написани

Ваня шифрует русские слова, заме

1. Составьте программу, выводящу

Контакты
Реклама на сайте