Информатика | 10 - 11 классы
Помогите написать (PascalABC).
Дана площадь и сторона прямоугольника, написать программу нахождения периметра (PascalABC)?
Дана площадь и сторона прямоугольника, написать программу нахождения периметра (PascalABC).
Информатика?
Информатика.
PascalABC.
Даю 40 баллов.
Составте программу в рисовании PascalABC?
Составте программу в рисовании PascalABC.
Помогите нарисовать снеговика в PascalABCКак в учебнике для 7 класса?
Помогите нарисовать снеговика в PascalABC
Как в учебнике для 7 класса.
Помогите, пожалуйста, решить в PascalABC?
Помогите, пожалуйста, решить в PascalABC!
Хотя бы одну.
Дано действительное х?
Дано действительное х.
Вычислить у.
На PascalABC, помогите, пожалуйста.
Пожалуйста помогите нарисовать поезд с вагонами в PascalABCсрочнооооооо?
Пожалуйста помогите нарисовать поезд с вагонами в PascalABC
срочнооооооо!
Для чего предназначена программа PascalABC?
Для чего предназначена программа PascalABC?
Помогите пожалуйста (PascalABC?
Помогите пожалуйста (PascalABC.
NET).
Выяснить, упорядочены ли цифры в записи числа по убыванию?
Выяснить, упорядочены ли цифры в записи числа по убыванию.
Написать программу в PascalABC.
NET и нарисовать блок - схему.
На этой странице вы найдете ответ на вопрос Помогите написать (PascalABC)?. Вопрос соответствует категории Информатика и уровню подготовки учащихся 10 - 11 классов классов. Если ответ полностью не удовлетворяет критериям поиска, ниже можно ознакомиться с вариантами ответов других посетителей страницы или обсудить с ними интересующую тему. Здесь также можно воспользоваться «умным поиском», который покажет аналогичные вопросы в этой категории. Если ни один из предложенных ответов не подходит, попробуйте самостоятельно сформулировать вопрос иначе, нажав кнопку вверху страницы.
5)
Program n5 ;
var a, i, n, sum : integer ;
begin
readln(n) ;
sum : = 0 ;
for i : = 1 to n do
begin
readln(a) ;
sum : = sum + a ;
end ;
writeln(sum) ;
end.
6)
Program n6 ;
var n, i : integer ;
begin
readln(n) ;
for i : = 1 to n do if i mod 2 = 0 then write(i, ' ') ;
end.