Федоровна-Васильева
?>

Сделать цветную анимацию в qbasic.только не машину и не ёлку. салют например. 200 бонусов. заранее!

Информатика

Ответы

macmakka
Алгоритм 1) начало 2) объявление матрицы a(124,218) 3) цикл по i от 1 до 62 (строки) 3.1) цикл по k от 1 до 218 (столбцы) 3.1.1) если k нечетное, то a(i,k)=2; иначе a(i,k)=3 3.1.2) конец цикла по k 3.2) второй цикл по k от 1 до 218 3.2.1) если k нечетное, то a(i,k)=3; иначе a(i,k)=2 3.2.2) конец второго цикла по k 3.3) конец цикла по i (матрицу заполнили) 4) s = 0 (сумма элементов фрагмента) 5) цикл по i от 20 до 124 5.1) цикл по k от 30 до 218 5.1.1) s = s+a(i,k) 5.1.2) конец цикла по k 5.2) конец цикла по i 6) вывод s 7) конец. при заполнении матрицы в каждом цикле по строке я заполняю 2 строки: одну начиная с 2, вторую начиная с 3. поэтому цикл по i не от 1 до 124, а от 1 до 124/2=62. сумму я считаю внутри прямоугольника от a(20,30) до a(124,218), то есть до правого нижнего угла.
moskvabelarus
Сумма цифр в 4-зн. числе 1) начало 2) ввод 4-значного числа n. проверка, что 999 < n < 10000. 3) вычисление отдельных цифр. (далее [a] - это целая часть числа a). 3.1) a4 = [n/1000] (тысячи) 3.2) a3 = [ (n - a4*1000)/100) ] (сотни) 3.3) a2 = [ (n mod 100)/10 ] (десятки, n mod 100 - это остаток от деления n на 100) 3.4) a1 = n mod 10 (единицы) 4) сумма s = a1+a2+a3+a4 5) вывод s 6) конец. 2 . двузначное число палиндром - это число, которое читается с конца и сначала одинаково. для двузначных чисел это значит, что число состоит из двух одинаковых цифр. 1) начало 2) цикл по n от 10 до 99 3) вычисление цифр. 3.1) a2 = [n/10] (десятки) 3.2) a1 = n mod 10 (единицы) 4) если a1 = a2, то вывод n. 5) конец цикла по n 6) конец.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Сделать цветную анимацию в qbasic.только не машину и не ёлку. салют например. 200 бонусов. заранее!
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Станислав Роман994
bar02
info-mosbalkon
vallzh8328
Anastasiya
pronikov90
mikhail
twisty20075004
coffeenik20233
srvsm
Anatolii
Chuhnin195107364
romasmart9
k075ko8
Vadim443