Нужно написать программу, в pascal
10-11 класс
|
var
a, b, c, d: byte;
begin
for a := 1 to 5 do
begin
for b := 1 to 5 do
begin
c := (c = 10 ? 1 : c + 1);
write((a mod 10 = 1 ? c : 16 - c):3);
end;
writeln();
end;
end.
Другие вопросы из категории
философской концепции ее можно будет отнести?
вычесть a, ко всем отрицательным элементам прибавить b. В паскале. Значение a b n вводятся с клавиатуры
Помогите составить программу
Читайте также
13.
Нужно написать программу на цикле с предусловием, на Паскале.
оказаться)
нужно написать программу на c++
Используя обращения 1) по индексу и 2) по указателю.
Даны 6 различных чисел. Определить максимальное из них. (Определить функцию, находящую максимум из двух различных чисел).
Нужно написать программу для Pascal.
Коэффициенты заданы A= 4.00 B= -52.00 C= 144.00
A>0, D>0. Формулы для помощи: d=B^2 - 4*a*c; x1,2=(-b +- Sqrt(d))/(2*a)
Вывести вначале меньший корень, затем больший.
Нужно написать программу в Pascal'e.
Нужно очень очень. Подробно если можно