var s:string;
i:byte;
begin
writeln('Введите слово:');
readln(s);
writeln;
writeln('Их номера в алфавите:');
for i:=1 to length(s) do
case s[i] of
'А'..'Я' : write(ord(s[i])-1038+' ');
'а'..'я': write(ord(s[i])-1070+' ');
end;
readln
end.
Файл это можно сказать структура данных,или текст с кодом для программы а ведь программы не работают без файлов.
(Потому-что в файлах для программ содержится код)
(А когда программа запускается она требует файл с кодом)
В файле может быть текст или картинка или музыка.
Файл имеет расширении,а расширении в файле может обозначать его предназначение (допустим текст(txt) или видео с музыкой (mp3 mp4)
А программа это комбинация данных с помощью которых позволяет компьютеру что либо делать (допустим вычислять)
Так чем же отличается программа от файла , да тем что файл это часть программы.А программа можно сказать это множество скрещённых файлов.
1.Программа алплаллалпдпдпдппжюппд
Я, в основном, программы на С++ пишу, но из школы про Паскаль кое-что помню (в смысле, попытаюсь написать на Паскале).
Program A1;
var a,b,c,i:integer;
begin
write('Enter the a: ');
read(a);
writeln('Enter the b: ');
read(b);
с:=0;
for i:=1 to a Do
c:=c+b;
writeln('a*b=',c:5:0);
end.
Объясняю (начинаю сразу с цикла for): что значит произведение двух натуральных чисел а и b - это означает, сложить b с самим собой по а раз (можно и наоборот). Например, a=5, b=3. Переменную с=0 будем складывать с b.
i=1 c=5+0;
i=2 c=5+5;
i=3 c=10+5; //c=15
Вот и есть ответ: 5*3=15.
A, b, c = map(int, input().split()) #ввод в строчку
if min(a, b, c) > 10 and a%3 == 0 and b%3 == 0:
print("yes")
else:
print("no")