Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
svetakurilova
28.08.2020 05:09 •
Информатика
нужно записать программу и проверить в поскале. Я плоха по информатике. Поэтому жду вашей алг
цел s k
нач
s: 0
нц для k от 1 до 5
s:=s+2*k
кц
вывод s
кон
Ответ:
Komar1006
13.10.2020 17:35
var s, k: integer;
begin
s := 0;
for k:=1 to 5 do begin
s:= s + 2 * k;
end;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
kisasay1123
08.11.2020 12:08
(программирование паскаль) ! c клавиатуры вводится целое число. вывести на экран: следующее число, удвоенное значение числа, квадрат числа, куб числа, квадратный корень числа....
scvdnl
09.03.2023 09:42
На pascal. по информатике: дана последовательность из 16 чисел(числа вводятся с клавиатуры). подсчитать количество чисел оканчивающихся на шесть....
marina02427
09.03.2023 09:42
Чтобы вычеслитьвыражение , маша набрала число 128. в память комьютера записалось двоичное число 10000000. сколько ячеек в памяти компьтера занимает двоичный код числа 128?...
ladhice
09.03.2023 09:42
Pascal, дан целочисленный массив из 30 элементов. как найти сумму элементов после первого положительного? ?...
amira061
10.06.2020 21:06
Автоматическое устройство осуществило перекодировку информационного сообщения на языке, первоначально записанного в 16-битном коде unicode, в 8-битную кодировку кои-8. при...
rita145roden
10.06.2020 21:06
Сотруднику фирмы продиктовали по телефону ip-адрес компьютера. сотрудник записал этот адрес, но не поставил разделительные точки: 2153256182 восстановите ip-адрес....
м080878
04.02.2023 09:49
15б какое число будет отображено на экране, если при выполнении программы пользователь ввел 24 -85 program ex_2; var a,b,c,d: real; begin write( введите значение переменных...
Dashaaleshenko
08.08.2021 11:55
Решить в pascal заполнить массив (20 случайных чисел в диапазоне от 10 до 30). ввести число и определить, есть ли в массиве элементы, равные введенному числу и вывести их...
Astat2
20.07.2021 04:52
Дан целочисленный массив на 10 элементов.найти количество и сумму элементов кратных k...
Мария3467
20.07.2021 04:52
Решить .в одно из изданий л.н. толстого война и мир 1024 строницы.какой объём памяти (в мбайт) заняла бы эта книга, если бы лев николаевич набирал её на странице в среднем...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var s, k: integer;
begin
s := 0;
for k:=1 to 5 do begin
s:= s + 2 * k;
end;
writeln(s);
end.