Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
goratkin2005
18.11.2022 04:49 •
Информатика
Язык C
ввести с клавиатуры 2 вещественных числа. если числа одного знака то распечатать их произведение если числа разных знаков то распечатать их сумму
👇
Увидеть ответ
Открыть все ответы
Ответ:
Ева433
18.11.2022
1)
var
s: string[6];
n: integer;
begin
s := 'отлично';
n := length(s);
writeln(length('отлично'));
writeln(n);
end.
Изначально выставлен тип string[6], значит если присвоить строку больше, то ее обрежет по 6 символов, вот и весь прикол
ответ 6
2) рисунок
3)var
s, s1: string;
n: integer;
begin
s := 'информатика';
s1 := copy(s, 3, 5);
n := pos(s, s1);
writeln('s=', s);
writeln('s1=', s1);
writeln('n=', n);
end.
Вывод
s=информатика
s1=форма
n=0
Все верно, в s1 не содержится s, а наоборот
4,4
(27 оценок)
Ответ:
артём0092
18.11.2022
Var
i, n, s: integer;
begin
readln(n);
i := 0;
s := 0;
while i < 7 do
begin
if (n mod 2 = 1) then begin
s := s + n;
i := i + 1;
end;
n := n + 1;
end;
writeln(s);
end.
var
i, n, s: integer;
begin
readln(n);
i := 0;
s := 0;
repeat
if (n mod 2 = 1) then begin
s := s + n;
i := i + 1;
end;
n := n + 1;
until i >= 7;
writeln(s);
end.
var
i, n, s: integer;
begin
readln(n);
n := n + (n + 1) mod 2;
s := 0;
for i := 1 to 7 do
begin
s := s + n;
writeln(n);
n := n + 2;
end;
writeln(s);
end.
4,5
(28 оценок)
Это интересно:
О
Образование
16.03.2023
Решить систему уравнений x2 + y2 + xy = 3...
О
Образование
05.08.2020
Решить систему уравнений x2 + xy +y2 = 13...
О
Образование
06.04.2022
В треугольнике АВС проведена биссектриса АК...
О
Образование
11.03.2020
Водитель ехал с постоянной скоростью из города А в город Б...
О
Образование
27.04.2022
Первые 300 км автомобиль ехал со скоростью 60 км/час...
О
Образование
02.06.2023
В треугольнике АВС точка D на стороне АВ...
О
Образование
21.07.2020
Из разных городов, расстояние между которыми 600 км...
О
Образование
29.01.2020
Из пункта А в пункт B, расстояние между которыми 84 км...
Х
Хобби-и-рукоделие
21.02.2021
Правила и техника игры в карточную игру Скорость...
П
Питомцы-и-животные
23.03.2021
Как правильно обращаться с агрессивной кошкой...
Новые ответы от MOGZ: Информатика
misha515
06.08.2022
Вответах в книжке написано 5, решите подробно, не понимаю как получается такой ответ...
vaynasmirnov021
14.10.2021
Опишите действия которые выполнялись в создании модели...
Luxky
04.09.2022
1 Средствами текстового редактора MS Word создайте текстовый документ. Введите предложенный в задании текст....
PsyhovanayaPechenka
29.03.2021
Составьте алгоритм, под управлением которого Робот закрасит ряд клеток...
alfami2004
03.11.2020
Формирование изображения на экране монитора 4. Графический файл содержит чёрно-белое несжатое рас- тровое изображение с 16 градациями серого цвета раз- мером 10 х 10 пикселей....
kirya451
17.12.2022
Ввести с клавиатуры два натуральных числа и сравнить количество шагов цикла для вычисления их НОД с обычного и модифицированного алгоритмов Евклида. На Паскале...
СГлазамиЦветаСчастья
28.02.2020
1. Выполните вычисления по логическим схемам и запишите соответствующие логические выражения:...
Elbek11ee
02.03.2022
Який оператор використовують для неповного розгалуження у програмному коді Python...
artur17499
19.08.2020
Көне дәуірдегі мәдени мұралар туралы мақала жазу өтініш көмек бересіздерме...
innocen
19.08.2020
Орта гасырдын ірі мемелекеті пайда болу себебі дойылу себебі....
MOGZ ответил
К какому типу миграции относят «утечку мозгов», «утечку умов», «утечку...
Виберіть три відповіді з семи. Як змінюються властивості помірних морських...
Французский 1. La personne qui parle est ... a) un homme b) un jeune...
До ть будь ласка! Буду дуже вдячна. Схарактеризуйте зміни, що відбулися...
Функцію задано формулою y=-3x+4 . знайдіть значення функції ,якщо значення...
нужно решить систему уравнений...
У прямокутній системі координат на площині задано взаємно перпендикулярні...
Межэтнические (межнациональные) отношения – отношения между этносами...
Какое из нижеперечисленных событий произошло раньше, чем остальные избрание...
Через ДЕФІС треба писати всі прислівники в рядку А)по/сусідськи, що/ранку,...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
var
s: string[6];
n: integer;
begin
s := 'отлично';
n := length(s);
writeln(length('отлично'));
writeln(n);
end.
Изначально выставлен тип string[6], значит если присвоить строку больше, то ее обрежет по 6 символов, вот и весь прикол
ответ 6
2) рисунок
3)var
s, s1: string;
n: integer;
begin
s := 'информатика';
s1 := copy(s, 3, 5);
n := pos(s, s1);
writeln('s=', s);
writeln('s1=', s1);
writeln('n=', n);
end.
Вывод
s=информатика
s1=форма
n=0
Все верно, в s1 не содержится s, а наоборот