сервис вопросов и ответовПаскаль. Помогите, ребят. 1) Вывести на экран все трехзначные числа, числа которых расположены в порядке возрастания. Например, 123, 456, 789.
10-11 класс|
|
2) Заполните двумерный массив 4х5 случайными вещественными числами из диапазона [–1; 1]. Выведите его на экран. Подсчитайте общее количество неотрицательных элементов массиве.
3) Заполните двумерный массив 3х4 целыми числами с клавиатуры. Выведите его на экран. Найдите сумму элементов каждой строки.
Dcvccbv667dff
02 окт. 2015 г., 18:40:18 (8 лет назад)
Soffee
02 окт. 2015 г., 20:19:33 (8 лет назад)
var a,b,c,n:integer;
begin
for a:=1 to 7 do
for b:=a+1 to 8 do
for c:=b+1 to 9 do
begin
n:=a*100+b*10+c;
write(n:4)
end;
end.
var
i,j,n:integer;
a:array[1..4,1..5]of real;
begin
for i:=1 to 4 do
begin
for j:=1 to 5 do
begin
a[i,j]:=random*2-1;
write(a[i,j]:20:15);
if a[i,j]>=0 then n:=n+1;
end;
writeln;
end;
writeln('Количество неотрицательных: ',n);
end.
var
i,j,sum:integer;
a:array[1..3,1..4]of integer;
begin
for i:=1 to 3 do
for j:=1 to 4 do
readln(a[i,j]);
writeln('Массив:');
for i:=1 to 3 do
begin
for j:=1 to 4 do
begin
sum:=sum+a[i,j];
write(a[i,j]:4);
end;
writeln('sum=':8,sum);
sum:=0;
end;
end.
Ответить
Другие вопросы из категории
ПОМОГИТЕ!!!! ОЧЕНЬ НУЖНО! Внимательно осмотрите порядок. Определите, что выполняет данный фрагмента алгоритма:
ЕСЛИ Х<Y TO
ЕСЛИ X<Z TO M:=X
ИНАЧЕ M:=Z
ВСЕ
ИНАЧЕ
ЕСЛИ Y<Z TO M:=Y
ИНАЧЕ М:=Z
ВСЕ
ВСЕ
Помогите решить, язык C++
Ввести данные о численности населения (млн. жителей) и
площади (кв.км) для нескольких государств, для этого использовать структуру (пользовательский тип данных). Определить название
государства с минимальной плотностью населения. Спасибо
Читайте также
1. Пользователем вводится целое число. Вывести на экран последовательность целых чисел от единицы до этого числа.
2.Вывести на экран 10 строк, содержащие символ *, причем количество * в каждой строке должно быть равно номеру строки.
3.Пользователем вводится 2 целых числа. Вывести на экран сумму положительных четных чисел, находящихся в границах диапазона, указанного пользователем.
4. В результате работы программы формируется массив, состоящий из 10 элементов и заполненный случайными числами от 0 до 100. Вывести на экран этот же массив в порядке возрастания.
5.Вводится строка, содержащая буквы и цифры разного регистра (т.е. строчные и прописные буквы). В результате работы программы на экран выводится строка следующего вида: цифры в порядке возрастания, строчные буквы по алфавиту, прописные буквы по алфавиту.
1)ввести с клавиатуры массив из n элементов вывести на экран элементы меньшие среднего арифметического всех элементов массива
2) ввести с клавиатуры массив из n элементов вывести на экран максимальный четный элемент и минимальный нечетный элемент
Даны действительные числа x, y. Вывести на экран то из них, которое меньше.
Даны два символа (латинские буквы). Вывести их на экран в порядке возрастания по алфавиту.
Очень вас прошу помочь написать программу.Написать программу-
1)с помощью генератора случайных чисел создать Н числа в диапазоне с [-50;50](длину массива Н надо ввести с клавиатуры)
2)надо вывести сделанный массив на экран
3)нужно вычислить и вывести,какое количество парных чисел
4)и вывести на экран все парные числа.
Очень вас прошу помогите,очень нужно до завтра сделать.Если можете помочь мне,пожалуйста помогите.
Помогите пожалуйста в VBA
Вводить целые числа до тех пор,пока сумма четных чисел не превысит значения 25 по модулю . Вывести на экран все введенные числа.
Вы находитесь на странице вопроса "Паскаль. Помогите, ребят. 1) Вывести на экран все трехзначные числа, числа которых расположены в порядке возрастания. Например, 123, 456, 789.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.