Program z1;
var a, b:integer;
begin
write(' Введите возраст Саши - '); read(a);
write(' Введите возраст Mаши - '); read(b);
if a>b then writeln(' Саша старше Маши на ',a-b,' лет');
if a<b then writeln(' Маша старше Саши на ',b-a,' лет');
<span>end.</span>
1
2
3
4
5
6
7
8
9
10
11
12
13
14 procedure TForm1.Button1Click(Sender: TObject);
var
k,i,j:integer;
begin
k:=10;
for i:=1 to 90 do begin
if (k mod 7)=0 then begin
j:=j+1;
stringgrid1.cells[1,i]:=inttostr(k);
end;
k:=k+1;
end;
label1.Caption:=inttostr(j);
end;
#include <stdio.h>#include <iostream>#include <math.h>
int main() {
system("chcp 1251");float perimetr, ploshad, a, b;printf("Введите стороны прямоугольника (a,b): ");scanf ("%f, %f", &a, &b);perimetr = (a+b)*2;ploshad = a*b;printf("\n Периметр равен: %.2f \n Площадь равна: %.2f \n", perimetr,ploshad);
system ("pause");return 0;}
Нет нельзя, для программирования нужны знания алгебры геометрии и математики информатики. Программирование напрямую связано с числами. Языки программирования на которых основана любая программа пишутся числами. Любые символы и буквы в компьютере которые мы видим это последовательность определенного кода заданного числами.