Maksim Lokhov
?>

Объясните как решать 10 огэ по информатике желательно, чтобы было максимально понятно с: в таблице dat хранятся положительные или отрицательные целые числа. определите, что будет напечатано в результате выполнения следующего алгоритма, написанного на трех алгоритмических языках. алгоритмический язык алг нач целтаб dat[1: 10] цел к, т, пит dat[1]: = 7; dat[2]: = -8 dat[3]: = 3; dat[4]: = б dat[5]: = -4; dat[6]: = 3 dat[ 7 ] : = 5; dat[8]: = -5 dat [9] : = 7; dat [10] : = 1 num : = 1; m : = dat[1] нц для k от 2 до 10 если dat[k] * m < 0 то m : = dat[k]; num : = k все кц вывод num кон бейсик dim dat (10)as integer dat (1) - 7: dat (2) = -8 dat (3) =3: dat (4) = 6 dat (5) = -4 dat (6) =3 dat (7) = 5: dat (8) = -5 dat (9) = 7: dat(10) = i num = 1: m = dat (1) for k = 2 to 10 if dat(k) * m < 0 then m = dat(k) num = k end if next k print num end паскаль var k, m, num: integer; dat: array[1..10] of integer; begin dat[1]: = 7; dat[2]: = -8; dat[3]: = 3; dat[4]: = 6; dat[5]: = -4; dat[6]: = 3; dat[7]: = 5; dat[8]: = -5; dat [9] : = 7; dat[10] : = 1; num: = 1; m: = dat[1]; for k: = 2 to 10 do begin if dat[k] * m < 0 then begin m : = dat [k]; num : = k end end; write(num); end.

Информатика

Ответы

Бондарен1076
Эта программа ищет в массиве элементы, имеющие противоположный знак с предыдущими
Как дано в примере - выведет в качестве места смены знака 9, 8-й элемент отрицателен, девятый положителен.
ИП_Рамис873
Напишите  программу,  которая  выбирает  максимальное  и  минимальное  из  пяти  введённых  чисел.3.напишите  программу,  которая  определяет,  верно  ли,  что  введённое  число  –  трёхзначное.4.напишите  программу,  которая  вводит  номер  месяца  и  выводит  название  времени  года.оператор  выбора  использовать  не  разрешается.  при  вводе  неверного  номера  месяца  долж‐но  быть  выведено  сообщение  об  ошибке.5.решите  предыдущую    с    оператора  выбора.6.напишите  программу,  которая  вводит  с  клавиатуры  номер  месяца  и  определяет,  сколько  дней  в  этом  месяце.  при  вводе  неверного  номера  месяца  должно  быть  выведено  сообще‐ние  об  ошибке.7.напишите  программу,  которая  вводит  с  клавиатуры  номер  месяца  и  день,  и  определяет,сколько  дней  осталось  до  нового  года.  при  вводе  неверных  данных  должно  быть  выведено  сообщение  об  ошибке.8.напишите  программу,  которая  вводит  возраст  человека  (целое  число,  не  превышающее  120)и  выводит  этот  возраст  со  словом  «год»,«года»  или  «лет».  например,«21  год»,«22  года»,«25  лет».9.напишите  программу,  которая  вводит  целое  число,  не  превышающее  100,  и  выводит  его  прописью,  например,21→«двадцать  оди
Джамал1009

Достоинства

Графический интерфейс является «дружелюбным» для пользователей, которые начали знакомство с компьютером с графического интерфейса.

В программах обработки графики он, зачастую, является единственно возможным

Недостатки

Большее потребление памяти в сравнении с текстовым интерфейсом

Сложнее организовать удаленную работу

Невозможность автоматизации, если она не была заложена автором программы

Графический интерфейс не является «дружелюбным» для пользователей, которые начали знакомство с компьютером с интерфейса командной строки.

Графический интерфейс сложнее в использовании для незрячих людей.

Объяснение:

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Объясните как решать 10 огэ по информатике желательно, чтобы было максимально понятно с: в таблице dat хранятся положительные или отрицательные целые числа. определите, что будет напечатано в результате выполнения следующего алгоритма, написанного на трех алгоритмических языках. алгоритмический язык алг нач целтаб dat[1: 10] цел к, т, пит dat[1]: = 7; dat[2]: = -8 dat[3]: = 3; dat[4]: = б dat[5]: = -4; dat[6]: = 3 dat[ 7 ] : = 5; dat[8]: = -5 dat [9] : = 7; dat [10] : = 1 num : = 1; m : = dat[1] нц для k от 2 до 10 если dat[k] * m < 0 то m : = dat[k]; num : = k все кц вывод num кон бейсик dim dat (10)as integer dat (1) - 7: dat (2) = -8 dat (3) =3: dat (4) = 6 dat (5) = -4 dat (6) =3 dat (7) = 5: dat (8) = -5 dat (9) = 7: dat(10) = i num = 1: m = dat (1) for k = 2 to 10 if dat(k) * m < 0 then m = dat(k) num = k end if next k print num end паскаль var k, m, num: integer; dat: array[1..10] of integer; begin dat[1]: = 7; dat[2]: = -8; dat[3]: = 3; dat[4]: = 6; dat[5]: = -4; dat[6]: = 3; dat[7]: = 5; dat[8]: = -5; dat [9] : = 7; dat[10] : = 1; num: = 1; m: = dat[1]; for k: = 2 to 10 do begin if dat[k] * m < 0 then begin m : = dat [k]; num : = k end end; write(num); end.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Андрей628
tefdst
mez-omts-d5
aniramix
morozovalexander90
nst-33764
symkifm
Bi-1704
red-sun2
admiral-kazan
Камочкин
Олег86
shuxratmaxmedov
fil-vasilij90
vkorz594