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

Дан массив из 10 элементов, заполненный случайным образом. значения элементов от -50 до 50. вывести на экран элементы массива, оканчивающиеся на 4 или 8.

👇
Ответ:
kiscaki
kiscaki
08.12.2020
Var
a: array [1..10] of integer;
i, n: byte;
begin
Randomize;
for i:=1 to 10 do 
begin 
a[i]:=random(100)-50; 
n:=abs(a[i] mod 10); 
if (n = 4) or (n = 8) then write(a[i]:4); 
end;
readln;
end.
4,6(55 оценок)
Открыть все ответы
Ответ:
Vikamurzikk
Vikamurzikk
08.12.2020

var i,n,m,sum,pr,k,j:longint;

begin

 sum:=0; pr:=1;

 write('m: '); readln(m);

 write('n: '); readln(n);

 i:=2;

 repeat

   if m mod i = 0 then

     begin

       sum:=sum+i;

       m:=m div i;

       i:=2;

     end

       else inc(i);

 until m=1;

 writeln('Sum_M:', sum);

 for i:=2 to n div 2 do

   if n mod i = 0 then

     begin

       k:=2;

       for j:=2 to i div 2 do

         if i mod j = 0 then inc(k);

       if (k>2)and(i mod 3 = 0 ) then

         pr:=pr*i;

     end;  

 writeln('Proizv_N:', pr);

 if sum>pr then writeln('Da, sum prost del M > proizv sost del N')

   else

     writeln('Net, sum prost del M < proizv sost del N');

end.

4,4(100 оценок)
Ответ:
lubimka4
lubimka4
08.12.2020
Вот так правильно и тебе там нужно объявить M_PI
#include <iostream>#include <cmath>using namespace std;int main(){    int x;    float A;    cout<<"Введите Ñ…=";    cin>>x;    if (x >= M_PI){        A=0;        cout<<"y=0"; }    else if(M_PI>x && x>=0) {        A=sin(x);        cout<<"y=sin(x)"; }    else if (0>x && x>=-2){        A=0;        cout<<"y="; }    else if (x<=-2) {        A = pow((x+2),2);        cout <<"y="; }
return 0;}
4,5(39 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ