петрАфанасьев

30.03.2020

Составьте программу для вычисления значения выражения: 1 + 1, 1 + 1, 2 ... + 5PascalABC.NET

Информатика

Ответить

Ответы

Kozlovao4

30.03.2020

var a,b,h,s:real;

begin

writeln('Программа считает сумму чисел: 1 + 1.1 + 1.2 +...+ 5');

b:=1;

a:=1;

while a < 4.9 do begin

a:= a + 0.1;

b:= b + a;

end;

writeln(b);

end.

ответ : 123

Объяснение:.

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

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

Составьте программу для вычисления значения выражения: 1 + 1, 1 + 1, 2 ... + 5PascalABC.NET

▲

Составьте программу для вычисления значения выражения: 1 + 1, 1 + 1, 2 ... + 5PascalABC.NET

Ответы

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

Ваше имя (никнейм)*

Email*

Комментарий*

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

Решите по информатике, В закрепе файл ворд, где надо решить.

Напишите программу, которая вводит номер месяца и выводит название времени года.. при вводе неверного номера месяца должно быть выведено сообщение об ошибке.

Що буде надруковане в результаті виконання фрагменту програми, якщо n=14, m=49 n-int (ibout) if n<m a=nelse: a=mfor chyslo in range (1, a+1): if (n chyslo==0) and (m chyslo==0):print (chyslo)

Написать программу, которая проверяет, делится ли на 3 целое число, введеное с клавиатуры WPF (!)

Що таке довготривалий захист

Дан фрагмент кода программы, написанный с использованием Python. Какой виджет будет создан при его использовании? k=tk. Button(text='результат', bg='green') cavas1. create_window(200, 220, window=k...

Как найти 300 решений в Эксель, по 300 данным по 2 столбцам сразу, а не отдельно по каждым данным по одной строке. Как все решить за быстро

Найти сумму чисел, оканчивающихся на 9 (Паскаль): дана последовательность из N чисел, количество чисел вводится с клавиатуры. Числа выбираются из промежутка [ 10; 50 ] .

нарисуйте блок схему. Ввести число с клавиатуры. Прибавлять к нему 5, до тех пор пока оно не станет больше самого себя в 10 раз

Составьте программу для вычисления значения выражения: 1 + 1, 1 + 1, 2 ... + 5PascalABC.NET ​

Ответы

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

Ваше имя (никнейм)*

Email*

Комментарий*

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

Решите по информатике, В закрепе файл ворд, где надо решить.

Напишите программу, которая вводит номер месяца и выводит название времени года.. при вводе неверного номера месяца должно быть выведено сообщение об ошибке.

Що буде надруковане в результаті виконання фрагменту програми, якщо n=14, m=49 n-int (ibout) if n&lt;m a=nelse: a=mfor chyslo in range (1, a+1): if (n chyslo==0) and (m chyslo==0):print (chyslo)​

Написать программу, которая проверяет, делится ли на 3 целое число, введеное с клавиатуры WPF (!)

Що таке довготривалий захист

Дан фрагмент кода программы, написанный с использованием Python. Какой виджет будет создан при его использовании? k=tk. Button(text='результат', bg='green') cavas1. create_window(200, 220, window=k...

Как найти 300 решений в Эксель, по 300 данным по 2 столбцам сразу, а не отдельно по каждым данным по одной строке. Как все решить за быстро

Найти сумму чисел, оканчивающихся на 9 (Паскаль): дана последовательность из N чисел, количество чисел вводится с клавиатуры. Числа выбираются из промежутка [ 10; 50 ] .

нарисуйте блок схему. Ввести число с клавиатуры. Прибавлять к нему 5, до тех пор пока оно не станет больше самого себя в 10 раз​

Составьте программу для вычисления значения выражения: 1 + 1, 1 + 1, 2 ... + 5PascalABC.NET

Що буде надруковане в результаті виконання фрагменту програми, якщо n=14, m=49 n-int (ibout) if n<m a=nelse: a=mfor chyslo in range (1, a+1): if (n chyslo==0) and (m chyslo==0):print (chyslo)

нарисуйте блок схему. Ввести число с клавиатуры. Прибавлять к нему 5, до тех пор пока оно не станет больше самого себя в 10 раз