tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составте программу вычеления
Составте программу вычеления суммы нечётных и произведения чётных чисел в диапазоне от 40 до 60.
Pinno4ka
3 29.05.2019 18:50
0
Ответы
igorlevocko
29.06.2020 01:05
Program gt;
var i,s,p:longint;
begin
s:=0;
p:=1;
for i:=40 to 60 do
begin
if(i mod 2=0)then p:=p*i else s:=s+i;
end;
writeln(s,' ',p);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
mila336
08.07.2019 06:50
Составить алгоритм нахождения всех неотрицательных чисел стоящих на четных местах в последовательности x1,x2,...
imail91
08.07.2019 06:50
Написать программу в паскале. дана площадь s круга. найти его диаметр d и длину l окружности, ограничивающей этот круг, учитывая, что l = 2·π·r, s = π·r^2 . в качестве...
NastyTyan
08.07.2019 06:50
Даны два числа a и b. вам нужно вычислить их сумму a b. в этой вам нужно читать из стандартного воода и выводить ответ в стандартный вывод...
Алисика11
08.06.2019 16:40
Склавиатуры вводится последовательность чисел до тех пор пока не будет введено число 0. требуется найти произведение чисел из введенной последовательности кратных...
Светасветасветасвета
08.06.2019 16:40
Написать программу, которая вычисляет факториал числа, введенного с клавиатуры, используя цикл с постусловием. язык - pascal...
siylvio
08.06.2019 16:40
Дан массив а состоящий из 15 целых чисел. требуется найти среднее арифметическое тех элементов массива запись которых оканчиваются на 7...
nikita57551
08.06.2019 16:40
Заранее огромное b 16-ричной системе счисления сумма чисел е в шестнадцатиричной системе и двадцать в восьмеричной равна a) 1d; b) 1e; c) 2a; d) 1b; е) 1c. b 16-ичной...
solovyevadasha
08.06.2019 16:50
Нахождение самого длинного слова в тексте. найти самое длинное слово в тексте. если таких слов несколько, то взять последнее. написать на паскале...
polina686
31.01.2022 20:31
Напишите программу которая будет показывать данный рисунок. Информатика 7 класс...
mrarmen1999mailru
31.01.2022 20:31
Дано целое двухзначное число х. Запишите команды, позволяющие получить первую и последнюю цифры числа. Выполняется в Pascal ABC.Реализация алгоритмов работы с целочисленными...
Популярные вопросы
Сколько витаминов в цыплёнке бройлера например так d...
1
Морфологический разбор глагола вонзит...
1
Наиболее крупный город азиатской части россии является...
2
Укажите правильное обьяснение постановки в предложении лишнее говорить-только...
3
А1. стороны прямоугольного треугольника равны 5 см, 12 см и 13...
1
Вкажіть кількість звуків і букв у кожному слові: 1.грем яч 2.калуш...
3
Дано: mgo+hci=mgci2+h2o mgo=100г mgci2=x2...
1
Прямоугольная рамка площадью 100 см2 вращается в горизонтальном...
1
2.одна из диагоналей ромба на 4 см больше другой, а площадь ромба...
2
Напишите на резонанс,локацию и закон сохранения энергии по...
1
var i,s,p:longint;
begin
s:=0;
p:=1;
for i:=40 to 60 do
begin
if(i mod 2=0)then p:=p*i else s:=s+i;
end;
writeln(s,' ',p);
end.