Напишите программу пожалуйста
5-9 класс
|
я не знаю но мой совет ещё раз напиши эту задачу
var
a:array[1..5,1..5]of integer;
i,j:integer;
begin
writeln('Исходная матрица: ');
for i:=1 to 5 do
begin
for j:=1 to 5 do
begin
a[i,j]:=random(10);
write(a[i,j]:3);
end;
writeln;
end;
write('Ответ: ');
for i:=1 to 5 do write(a[i,i]);
end.
Хотя бы что-нибудь
Вывести элементы главной диагонили?
Другие вопросы из категории
значениями исходный массив, начиная с первой позиции. В каком из блоков допущена ошибка?
Читайте также
натуральные числа A , B, где B>A. Напишите программу последовательность натуральных чисел от A до B, включающая A и B.
Пожалуйста помогите !!!!!!!!
«незачет», если введено число 1 или 2.
Напишите программу, выводящую текст «плохо», «удовлетворительно», «хорошо»
или «отлично», если введено число 2, 3, 4 или 5 соответственно.
РЕШИТЕ ПОЖАЛУЙСТА
его на цифры. Например, при вводе числа 123 программа должна
вывести 1, 2, 3.
2. Напишите программу, которая вводит возраст человека (число, не
превосходящее 120) и выводит на экран этот возраст со словом «»год,
«года» , «лет» . например «21 год», «22 года», «15 лет»
Помогите пожалуйста !!!!
строках.Вывод результата сопроводите пояснениями
2)Напишите программу ввода трех величин( А,В,С) на одной строке,рассчитайте и выдайте на экран на отдельной строке значение выражения: (А*В)/3,14 +3С.
3)Напишите программу вычисления длины окружности и площади круга одного и того же заданного радиуса R.
Решать на паскале...Помогите пожалуйста(((
результат
2.дано целое число.напишите,программу которая выводит на экран последнюю цифру данного числа,затем возводит ее в квадрат и выводит на экран монитора результат