Паскаль.
5-9 класс
|
На интервале от 100 до 300 найти среднее арифметическое чисел, кратное 10.
var
k, i:integer;
SrAr:real;
begin
k:=0;
s:=0;
for i:=100 to 300 do
if i mod 10=0 then
begin
k:=k+1;
s:=s+i;
end;
SrAr:=s/k;
writeln(Sr:5:2);
end.
Другие вопросы из категории
что оруженосец не плывет и не остается на берегу с чужими рыцарями без товарищей?
b)У исполнителя Вычислитель две команды:
1. x+n
Это означает, что если точка имеет координаты (x,y), то новая координата по x становится равной x+n. Координата по y при этом становится равной y+2n-10.
2. y+m
Это означает, что если точка имеет координаты (x,y), то новая координата по y становится равной y+m. Координата по x при этом становится равной x+40-m. Команды разделяются запятыми. Например, программа x+1, y+1 переводит точку с координатами (100,100) в точку с координатами (140,93). Известно, что программа x+25, y+32 перевела некоторую точку в точку (67, 76). Найти координаты начальной точки.
превышающих заданного натурального числа N?
Вообще с Паскалем у меня полный завал! Если знаете как, то напишите! Желательно с объяснениями, буду благодарна!
Читайте также
программу на Паскале, в которой вычисляются четыре величины: средние температуры зимних месяцев, весенних месяцев, летних и осенних. 2)Вы посетили магазин и купили 10 видов товара. В таблицу T [1..10] записали количество купленного товара каждого вида. В таблицу C [1..10] записали цену единицы каждого вида товара соответственно. Составить программу на Паскале вычисления общей стоимости всех покупок.
Даны натуральное число n и вещественные числа a1, a2, ..., an. Определить среднее арифметическое вещественных чисел...
ПАСКАЛЬ,ПОМОГИТЕ ПОЖАЛУЙСТА
Простейшая программа на Паскале будет выглядеть следующим образом:
program upr;
begin
writeln ( ? ); {оператор вывода строки}
end.
Определи, какая фраза пропущена на месте вопросительного знака?
’Hello, World!’
“Lorem ipsum”
Just Another Perl Hacker
ПОЖАЛУЙСТА,ХОТЯ БЫ НА ПАСКАЛЕ СОСТАВЬТЕ!
Задали написать программу на язвке паскаль:вычислить и вывести на экран 8 первых элементов ряда если каждый элемент задан формулой а1= i/sin*i