3. Укажите соответствия. Компьютеры Характеристики Миникомпьютеры на интегральных схемах. I поколение 2 поколение Полупроводниковые машины на транзисторах. Искусственный интеллект. Вычислительные системы на большой интегральной схеме.
На паскалі: program _1; var a,b,c,i:integer; begin write('Введіть чисельник дробу: '); readln(a); write('Введіть знаменник дробу: '); readln(b); if a>b then c:=a else c:=b; for i:=1 to c do if ((a mod i)=0) and ((b mod i)=0) then begin a:=a div i; b:=b div i; end; writeln(a,'/',b); end.
На Сішці:
#include <iostream> using namespace std; int main(){ setlocale(LC_ALL, "Ukr"); int a,b,c,i; cout<<"Введіть чисельник: "<<endl; cin>>a; cout<<"Введіть знаменник: "<<endl; cin>>b; (a>b)?c=a:c=b; for (i=1;i<=c;i++){ if ((a%i==0)&&(b%i==0)){ a=a/i; b=b/i; } } cout<<a<<"/"<<b<<endl; system("pause"); } Буду вдячний за "Кращу відповідь"
Паскаль(в переменную а записоваем трехзначное число) program _1; var a,b:integer; s,s1:integer; begin readln(a,b); s:=a mod 100; s1:=sqr(s+b); writeln(s1); end.
На Сишке(в переменную а трехзначное) #include <iostream> using namespace std; int main(){ int a,b,c; cin>>a>>b; a=a%100; c=(a+b)*(a+b); cout<<c<<endl; system("pause"); }
Если коротко обьяснить тему, то так: суть в том, чтоб откинуть лишнее, тоесть оставить только десятки. Функция mod(паскаль) возвращает нам остаток от деления на какое нибудь число. Тоесть если мы например поделим 112 mod 100, то остаток будет 12, его мы и получим. Он же и является десятком. Тоже делает и знак % в Cишке. Если же нам надо получить целую часть от деления, то используем функцию div. Пример: 112 div 10 =11. Аналог в Сишке-знак "/" Буду благодарен за "Лучший ответ"
program _1;
var a,b,c,i:integer;
begin
write('Введіть чисельник дробу: ');
readln(a);
write('Введіть знаменник дробу: ');
readln(b);
if a>b then c:=a else c:=b;
for i:=1 to c do
if ((a mod i)=0) and ((b mod i)=0) then
begin
a:=a div i;
b:=b div i;
end;
writeln(a,'/',b);
end.
На Сішці:
#include <iostream>
using namespace std;
int main(){
setlocale(LC_ALL, "Ukr");
int a,b,c,i;
cout<<"Введіть чисельник: "<<endl;
cin>>a;
cout<<"Введіть знаменник: "<<endl;
cin>>b;
(a>b)?c=a:c=b;
for (i=1;i<=c;i++){
if ((a%i==0)&&(b%i==0)){
a=a/i; b=b/i;
}
}
cout<<a<<"/"<<b<<endl;
system("pause");
}
Буду вдячний за "Кращу відповідь"