М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
saididag
saididag
11.02.2022 21:24 •  Информатика

Дано натуральное число n. если оно делится на 4, вывести на экран ответ n=4k ( где k соответствующее частное), если остаток от деления на 4 равен 1, n=4k+1, если остаток на 4 равен 2 n=4k+2, если остаток от деления на 4 равен 3 n=4k+3, например 12=43, 22=45+2

👇
Ответ:
seSSS
seSSS
11.02.2022
Код Pascal1 2 3 4 5 6 7 8 9 Var   n,k: Integer; BEGIN Writeln('Введите N: '); Readln(n); Writeln('Введите K: '); Readln(k); If n mod 4=0 Then Writeln(4*k) Else If n mod 4=2 Then Writeln(4*k+2) Else If n mod 4=3 Then Writeln(4*k+3); END.
4,4(41 оценок)
Открыть все ответы
Ответ:
raisa3yusif
raisa3yusif
11.02.2022
N - количество чисел в последовательности, i - для организации цикла for, x - очередное число из последовательности
В начале задаем значение max = 0, потому что рассматриваем последовательность натуральных чисел ( 1 и больше), то есть первое же натуральное четное будет записано в max
В конце выводим ьфч только если он не равен нулю, тоесть в последовательности было натуральное четное число!
program z1;var n, i, x, max: integer;beginmax := 0;readln(n);for i := 1 to n dobegin   read(x);   if (x mod 2 = 0) and (x > max) then max := x;end;if max > 0 then writeln(max) else writeln ('Не таких чисел');end.
4,4(98 оценок)
Ответ:
mariberrr
mariberrr
11.02.2022
Var a,b,c,d,x,y,h,minx,miny:real; i:integer;
begin
writeln('a, b, c, d:');
readln(a,b,c,d);
h:=0.2;
x:=0; y:=a*x*x*x+b*x*x+c*x+d;
writeln(x:2:1,' ',y:5:2);
minx:=0; miny:=y;
for i:=1 to round((2-0)/h)+1 do
 begin
 x:=x+h;
 y:=a*x*x*x+b*x*x+c*x+d;
 writeln(x:2:1,' ',y:5:2);
 if y<miny then begin minx:=x; miny:=y; end;
 end;
writeln('min = y(',minx:2:1,') = ',miny:5:2);
end.

Пример:
a, b, c, d:
3 2 -1 4
0.0  4.00
0.2  3.90
0.4  4.11
0.6  4.77
0.8  6.02
1.0  8.00
1.2 10.86
1.4 14.75
1.6 19.81
1.8 26.18
2.0 34.00
2.2 43.42
min = y(0.2) =  3.90
4,4(59 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ