Дано два задания написать программу на паскале. Первую я написала, переделайте мою программу для второго задания. 1 ЗАДАНИЕ. Вывести фигуру квадрата 5х5 из чисел от 1 до 25 с “горизонтальной разверткой” 2 ЗАДАНИЕ. Вывести фигуру квадрата 5х5 из чисел от 1 до 25 с “вертикальной разверткой”
Программа для первого задания: var i:integer; begin for i:=1 to 25 do begin if i mod 5 <> 0 then write (i, ' ') else begin write (i, ' '); writeln; end; end; end. Переделайте ее для второго задания. Как вывелось в 1 задание (фото 1). Как должно выводится во втором задании (фото 2)
c = int(input('Enter 2 to start'))
while c != 1:
import math as m
a = int(input('Write a: '))
b = int(input('Write b: '))
c = int(input('Write c: '))
D = (b ** 2) - (4 * a * c)
print ('D =',D)
if D > 0:
print('D > 0')
x = (-b + (m.sqrt(D))) / (2 * a)
x1 = (-b - (m.sqrt(D))) / (2 * a)
print ('x1 =',x)
print ('x2 =',x1)
elif D == 0:
print('D = 0')
x = -b / (2 * a)
print ('x =',x)
else:
print('D < 0')
print ('No roots')
c = int(input('Enter 1 to quit or 2 to repeat'))
#include <iostream>
using namespace std;
int main () {
int n;
cin >> n;
if (n==0) {
cout << "0 0" << endl << 1 << endl << 1 << endl;
return 0;
}
int mx=0; int mn=10; int mxi=10; int mnk=0; int ind=0;
while (n>0) {
int c=n%10;
n/=10;
if (c>=mx) {
mx=c;
mxi=ind;
}
if (c<mn) {
mn=c;
mnk=1;
} else if (c==mn) {
++mnk;
++ind;
}
}
cout << mx << " " << mn << endl << (ind - mxi) << endl << mnk << endl;
return 0;
}
Объяснение: