Надеюсь, что задаваемый тобой язык - PascalABS 1) a:array[1..100] of integer; i,n:integer 2) Если разъяснишь, что ты имеешь ввиду под математической формулой для задачи такого вида, я могу объяснить тебе в комментариях 3) а) Начало цикла б) Если число делиться на 5 и не делиться на 7, то Вывод числа Иначе: (Ничего) в) Если число повтора цикла равно n, то Конец; Иначе: Вернуться к пункту a
4) Программа: program h1; var i,n:integer; var a:array [1..10] of integer; begin read(n) //Количество символов for i:=1 to n do read(a[i]); // Считывание значений для n количества символов for i:=1 to n do begin if( a[i] mod 5 = 0) and (a[i] mod 7 <>0) then write(a[i]); end; end.
Maksimova-Shorokhov303
30.06.2020
Потому что мы не напрямую говорим схемам компьютера что и как делать, мы для данного процесса используем язык программирования он формален потому что компьютер не знает данный язык он знает только машинные язык , а сам язык программирования он понятен для нас он формален для компьютера по этому существуют такие понятие как компиляция и прочие, проще говоря язык программирования создан для людей чтоб они могли легко и просто говорить что делать компьютеру, а он уже в свою очередь переводит всё на машинный язык и выполняет задачу
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Напишите наименьшее число х, для которого ложно высказывание:НЕ (x <= 50) или (х нечётное)?
1) a:array[1..100] of integer;
i,n:integer
2) Если разъяснишь, что ты имеешь ввиду под математической формулой для задачи такого вида, я могу объяснить тебе в комментариях
3) а) Начало цикла
б) Если число делиться на 5 и не делиться на 7, то
Вывод числа
Иначе: (Ничего)
в) Если число повтора цикла равно n, то
Конец;
Иначе: Вернуться к пункту a
4) Программа:
program h1;
var i,n:integer;
var a:array [1..10] of integer;
begin
read(n) //Количество символов
for i:=1 to n do
read(a[i]); // Считывание значений для n количества символов
for i:=1 to n do
begin
if( a[i] mod 5 = 0) and (a[i] mod 7 <>0)
then
write(a[i]);
end;
end.