Задать числовой двумерный массив с именем s размером b*c с датчика случайных чисел на промежутке случайности [-50, 50]. 1)вывести на экран элементы массива в виде таблицы 2)вывести элементы, которые больше числа 25 и их порядковые номера 3)найти вывести количества, сумму элементов больше 25 нарисовать блок-схему для 3 этапа, выполнить трассировку для 3 этапа, составить программу для всех этапов
Ответы
Код прокомментировал, если что-то не понятно пиши
Var n, k: integer; t, v, p : real; begin k: =0; for n : = 100 to 999 do begin p: = n div 100; v : = (n div 10)mod 10; t : = n mod 10; if (v = 2*p) and (t = 2*v) then k: =k+1 ; end; print(k); end.
Program llllllllll; var a, b : string; c: integer; begin writeln('введите имя'); readln(a); writeln('введите фамилию'); readln(b); c: =10; while c> 0 do begin write(a,' '); writeln(b); c: =c-1; end; end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Какие атрибуты присваиваются к объектам?
Автор: Алиференко_Елена342
3 вопросов .осталось 5 минут
Автор: trast45
