Лучшие помощники

Megamozg 2205 б
Matalya1 1800 б
DevAdmin 1720 б
arkasha_bortnikov 895 б
Dwayne_Johnson 865 б

Показать еще

·

Информатика

10 декабря 2022 21:48

577

Составьте алгоритм вычисления суммы всех натуральных чисел, не превышающих заданного натурального числа N. Напишите программу на Паскале.

1 ответ

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

var sum,n,i:integer;
begin
readln(n);
sum:=0;
for i:=1 to n do
sum:=sum+i;
writeln(sum);
readln;
end.

0

·

Хороший ответ

12 декабря 2022 21:48

Остались вопросы?

Найти нужный

Еще вопросы по категории Информатика

Дан фрагмент таблицы истинности выражения F: x1 x2 x3 x4 x5 x6 x7 F 1 0 0 1 1 1 1 0 1 1 1 0 1 1 0 0 0 1 0 1 1 0 0 1 Каким из приведенных ниже выра... Напишите программу, которая позволит проверять пароль на сложность. Проверку пароля следует проводить по таким критериям: 1. Длина: от 5 символов.... Является ли X простым числом.Pascal ABC.NET... Емкость USB флешки 256Мбайт. Какова емкость в USB флешки в байтах битах килобайтах информатика 8 кл... Сообщение, состоящее из 4096 знаков (с пробелами), занимает в памяти 3,5 Кбайт. Какова мощность алфавита, который использовался при кодировании этого...