Информатика 9 класс. составьте и запишите компьютерную программу на языке программирования паскаль для решения следующей : вычислить сумму всех натуральных чисел от заданного числа а до заданного пользователем числа в на всякий случай: имена переменных в программах у обучающихся совпадать не должны. также следует обеспечить достойный диалог с пользователем и комментарии: перед вами программа для нахождения … введите … а теперь введите … а вот и результат … в программе обязательны ! комментарий по ходу выполнения программы давать вразумительный, не менее 3-х слов в одной строке комментария.

284

287

Посмотреть ответы 2

Ответы на вопрос:

vitahoptaska343

Информатика

4,6(99 оценок)

Var ababab,bababa,sususumamama: integer; begin writeln('перед вами программа для нахождения суммы всех натуральных чисел заданного диапазона'); write(' введите наименшее число диапазона '); readln(ababab); write('а теперь введите наибольшее число диапазона '); readln(bababa); //оформляем ввод данных sususumamama: =0; //присваиваем сумме значение 0 while ababab< =bababa do begin sususumamama: =sususumamama+ababab; //увеличиваем сумму на число а ababab: =ababab+1; //увеличиваем число а на 1 end; write('сумма всех чисел диапазона равна '+sususumamama); //выводим сумму чисел end.

spetsialist

Информатика

4,7(3 оценок)

Var a,b,c: real; d: boolean; begin writeln ('введите строну а: '); readln(a); writeln ('введите строну b: '); readln(b); writeln ('введите строну c: '); readln(c); if (a=b) then d: =true else d: =false; writeln (d); end.