Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
Savi123
17.07.2020 10:07 •
Информатика
Составьте проект, в котором исполнитель нарисует отрезок длиной 50 шагов синим цветом, якшцо нажата клавиша стрелка вправо, или нарисуйте отрезок длиной 100 шагов красным цветом, если нажата клавиша стрелка вниз в скретч 2
👇
Увидеть ответ
Открыть все ответы
Ответ:
rootme
17.07.2020
1)
#include <iostream>
using namespace std;
int main() {
int s = 0;
for(int i = 1; i < 101; cout << i << ' ', s+=i, i+=2);
cout << endl << s << endl;
}
2)
#include <iostream>
using namespace std;
int main() {
int n, k = 0;
cin >> n;
for(int i = 0; i < n; i++) {
int number;
cin >> number;
if(number % 2 == 0) k++;
else k--;
}
if(k > 0) cout << "Четных" << endl;
else if (k < 0) cout << "Нечетных" << endl;
else cout << "Одинаково" << endl;
}
3)
#include <iostream>
using namespace std;
int main() {
for(int i = 20; i < 51; i++)
if(i % 3 == 0 && i % 5 != 0) cout << i << endl;
}
4)
#include <iostream>
using namespace std;
int main() {
for(int i = 35; i < 88; i++)
if(i % 7 == 1 || i & 7 == 2 || i % 7 == 5) cout << i << endl;
}
4,6
(27 оценок)
Ответ:
Маргольц
17.07.2020
Var
N, s, i: Integer;
s1: real;
begin
readln(N); {общий ввод для всех задач}
if N < 0 then
writeln('Задача 1. N=', 0)
else writeln('Задача 1. N=', N + 4);
s := 0;
for i := 1 to n do
s := s + i;
writeln('Задача 7. 1+2+3+…+N=', s);
write('Задача 9. Последовательность от N до 1 = ');
for i := n downto 1 do
write(i, ' ');
writeln();
s1 := 0;
for i := 1 to n do
s1 := s1 + i / 10;
writeln('Задача 12. 0,1+0,2+0,3+..+N/10=', s1);
write('Задача 13. Последовательность квадратов от 1 до N = ');
for i := 1 to n do
write(i * i, ' ');
writeln();
write('Задача 14. Последовательность первых N нечетных чисел = ');
for i := 1 to n do
write(2 * i - 1, ' ');
writeln();
if N > 0 then
writeln('Задача 20. N степень 3 = ', frac(ln(n) / ln(3)) = 0);
s := 0;
for i := 1 to n do
if n mod i = 0 then
s := s + i;
writeln('Задача 24. Сумма всех натуральных делителей числа N (сключая 1 и N) = ', s);
end.
4,4
(94 оценок)
Это интересно:
П
Питомцы-и-животные
10.07.2021
Как купать крысу: инструкция для любящих хозяев...
К
Компьютеры-и-электроника
28.07.2022
Как отправить видео: подробный гайд...
К
Кулинария-и-гостеприимство
14.01.2022
Как готовить подпаленную кукурузу на гриле: простой рецепт и полезные советы...
Ф
Финансы-и-бизнес
12.06.2020
Как создать маркетинговый календарь: советы для бизнеса...
О
Образование-и-коммуникации
26.01.2022
Как написать сочинение Как я провел лето : советы и рекомендации...
К
Компьютеры-и-электроника
18.01.2021
Как правильно пинговать IP адрес: простой гайд для начинающих...
Ф
Финансы-и-бизнес
21.12.2022
Как выбрать и купить восстановленный деревянный стол...
З
Здоровье
08.08.2020
8 советов по подготовке к приему к стоматологу: как не бояться и что вам нужно знать...
К
Компьютеры-и-электроника
05.09.2020
Как использовать контроллер Xbox 360 вместе с Windows...
К
Компьютеры-и-электроника
15.02.2021
Как избавиться от Mystart.Incredibar.Com: советы от экспертов...
Новые ответы от MOGZ: Информатика
7376373
22.11.2021
Составьте програму вычисления корней квадратного уравнения. с++...
Mildx
18.08.2021
Написать программу в паскаль. расстояние между пунктами а и b равно r. из пункта а в пункт b выезжает машина со скоростью v1. одновременно из пункта b в пункт а...
AkiraK666
04.05.2022
Вторичная подлежащая дополнительной обработке информация называется...
alex2071
04.09.2020
Логическая функция которая принимает истинное значение, когда хотя бы одно высказывание ложное...
sveronika00
06.05.2023
Операциями с двоичными числами которые производятся в эвм...
LikkaSchool205
22.11.2021
Срешением, , 90 1 переведите числа из десятичной системы счисления в восьмеричную: 1) 0,43 2) 37,41 3) 2936 4) 481,625 2 переведите числа из десятичной системы счисления...
Zemfir777
20.05.2021
Впрограммах паскаль. дана точка а (х,у). если х 0 и у 0, то сообщить «точка а находится в первой координатной четверти», иначе вывести ответ «точка а находится в...
dmitrijcazovo81
05.10.2020
Арифметико-логическое устройство - это устройство, которое: 1) представляет схемы, состоящие из , конденсаторов, сопротивлений 2) работает с двоичными по программам,...
sonyachibineva
12.01.2021
Вычитание двоичных чисел: 1) производится по таблице истинности 2) сводится к выполнению двух действий: сдвигу запятой вправо и суммированию сдвинутых чисел 3) производится...
DOGY228
10.10.2022
В электронной таблице значение формулы =СУММ(В1:В2) равно 5. Чему равно значение ячейки B3, если значение формулы =СРЗНАЧ(В1:В3) равно 5? Впишите ответ:...
MOGZ ответил
Не пользуясь микрокалькулятором, сравните два числа и укажите...
Как сказать как правильно читается слова lallemand...
Today i want to talk about your family. my name is katya . i...
18x - 15x + 8x = 55 решите уравнение....
Что носил на груди спицын? а) медальон б) крестик в) кошелек...
Вкорзине лежало x яблок, а в другой - в два раза больше. в двух...
Убрата и сестры вместе 28 картинок . сестра отдала брату 4 открытки...
Write in 10-12 sentences about what you advise or not advise...
Вопросы к редлодению *алый сапог в земле горит*...
Заполнить таблицу. казахстан в 1920-1941-е годы . состояние народного...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
#include <iostream>
using namespace std;
int main() {
int s = 0;
for(int i = 1; i < 101; cout << i << ' ', s+=i, i+=2);
cout << endl << s << endl;
}
2)
#include <iostream>
using namespace std;
int main() {
int n, k = 0;
cin >> n;
for(int i = 0; i < n; i++) {
int number;
cin >> number;
if(number % 2 == 0) k++;
else k--;
}
if(k > 0) cout << "Четных" << endl;
else if (k < 0) cout << "Нечетных" << endl;
else cout << "Одинаково" << endl;
}
3)
#include <iostream>
using namespace std;
int main() {
for(int i = 20; i < 51; i++)
if(i % 3 == 0 && i % 5 != 0) cout << i << endl;
}
4)
#include <iostream>
using namespace std;
int main() {
for(int i = 35; i < 88; i++)
if(i % 7 == 1 || i & 7 == 2 || i % 7 == 5) cout << i << endl;
}