Написать
10-11 класс
|
программу, которая 10 раз выводит на экран Ваши имя и фамилию в Turbo Pascal
var
fm, im: string;
i: integer;
begin
readln(фамилия, имя);
for i:= 1 to 10 do
writeln(имя,' ', фамилия);
readln;
end.
var i:integer;
begin
for i:=1 to 10 do
writeln ('Sellsaccount Sellsaccountov');
end.
вы такое проходите?
Во многих школах этот ужас проходят, найди в инете
сделай по примеру, я больше в кюбасике работала
Другие вопросы из категории
Перевести из 2-ойсистемы счисления в 8-10; 16-10
10011101101₂ и
11110001101₂
_________________________________________
Затем Перевести из 10-й с.с.в 3-ю с.с
555₁₀ --> X₃ (C проверкой)
785₁₀ --> X₇ (С проверкой) 7-ю с.с
_________________________________________
+111011₂
1101₂
-111011₂
1100₂
х11011₂
101₂
10101110₂÷111₂
Читайте также
числа. паскаль
написать программу на компьютере и проверить правильность
работы Вашей процедуры/функции, в этом случае в основной программе
должны быть реализованы ввод исходных данных и вызов
процедуры/функции.
Вводится строка, состоящая только из цифр без нуля. Написать пользовательскую функцию, которая возвращает строку , добавляя после каждого символа символ '0'.
добрый вечер, всем. помогите, пожалуйста, написать программу на Ассемблере.
задание:
Создать программу на языке Ассемблер, что позволяет организовать вычисления над элементами массивов
Объединить два массива 8-битных целых чисел со знаком. Сначала элементы второго затем первого.
заранее огромное спасибо всем!
2.написать программу в паскале
f(x)=2(sin*sin)x+1
Ребят, помогите! Тема: одномерные массивы. Две задачи:
1) Написать программу, которая из заданного одномерного массива размерности N находит сумму только тех элементов, значения которых больше некоторого значения S.
S=5; Массив: 0,4 5,6 -2 10,1
2) При поступлении в ВУЗ абитуриенты, получившие "Двойку" на первом экзамене, ко второму не допускаются. В массиве A[N] записаны оценки экзаменующихся, полученных на первом экзамене. Подсчитать, сколько человек не допущено ко второму экзамену!
Заранее благодарю!