Информатика, опубликовано 13.02.2019 04:50
1) дан массив р(n), состоящий из n вещественных чисел. заменить отрицательные элементы массива их квадратами,и новый массив переписать в s(n). : *
Ответ оставил: Гость
Uses crt; const n=20; var p: array[1..n] of integer; s: array[1..n] of integer; i,j: integer; begin randomize; for i: =1 to n do begin p[i]: =random(40)-20; write(p[i]: 3); end; writeln; for i: =1 to n do if p[i]< 0 then p[i]: =p[i]*p[i]; for j: =1 to n do for i: =1 to n do if i=j then s[j]: =p[i]; for j: =1 to n do write(s[j]: 4); end.
Ответ оставил: Гость
1) Прочитать задачу.
2) Выписать известные и неизвестные нам переменные в «дано». (В задаче №1 к известным переменным относятся стороны: a,b ;к неизвестным — площадь S и периметр P)
3) Вспомнить либо составить необходимые формулы. (У нас: S=a*b; P=2*(a+b))
4) Составить блок-схему.
5) Записать решение на языке программирования Pascal.
Запишем условие в более кратком виде.
Дано: a,b
Найти: S,P
Блок-схема:
так надо делать
2) Выписать известные и неизвестные нам переменные в «дано». (В задаче №1 к известным переменным относятся стороны: a,b ;к неизвестным — площадь S и периметр P)
3) Вспомнить либо составить необходимые формулы. (У нас: S=a*b; P=2*(a+b))
4) Составить блок-схему.
5) Записать решение на языке программирования Pascal.
Запишем условие в более кратком виде.
Дано: a,b
Найти: S,P
Блок-схема:
так надо делать
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01